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PREFACE 


This publication provides information on how to incorporate JES3 into an 
OS/VS2 Release 3 system. It also contains informition that temporarily 
supplements other OS/VS2 publications. 


This publication is divided into the following chapters: 


Distribution Tape, which describes the JES3 independent component 
release (ICR) distribution tape. 


Installation Procedure, which describes how to install JES3 in OS/VS2 
Release 3, 


written by JES3 to the SMF data set and describes the space required 
for JES3 SSF records. 


Ses ea hss we! SSS SS SS SSS ewe SSS 


restart suprort for JES3. 


Codes, which lists and explains completion codes issued by JES3 and 
provides routing and descriptor codes information associated with 
JES3 messages. 


Dynamic Support Syster Informa ion, which describes what must be done 
to allow DSS to operate in a J:S3 system. 


ASE to JES3 Migration Aid, whi: h contains all information related to 
functions, operation, messages and logic of this special aid 
provided with JES3 and ASP version 3.1.7 and above. 


JES3 Programming Notes and Restrictions, which contains necessary 
information that may not be included in other publications. 


Ordering, Distribution, and Pullications Support, which provides the 
user with ordering and distrib:tion procedures for the JES3 ICR, the 
basic and optional paterial lists, as well as the publications 


support for the JES3 Ick. 


te 


The following publications contail specific JES3 information: 


Operator's Library: OS/VS2 Reference (JES3), GC38-0226 
Operator's Library: OS/VS2 Rem ote Terminals (JFS3), GC38-0228 
OS/VS2 System Programming Librury: JES3 Debuyging Guide, GC28-0703 


OS/VS2 System Programming Library: Initialization and Tuning Guide, 
GC28-0681 


OS/VS2 Introduction to JES3, GC28-0607 


OS/¥S52 System Programming Library: JES3 Macro Instructions, GC36-0608 


Preface 3 


® OS/VS2 System Programming Lib:ary: Job Management, GC2s-0627 
@ OS/VS2 JCL, GC28-0692 


e OS/VS Messaye Library: JES3 Messages, GC38-1012 


Related Publications 
The following publications are referred to in the text: 


e OS/VS Checkpoint/Restart, GC26-3764 


e OS/VS Dynamic Support System, GC28&-0640 


e OS/VS Message Likrary: Routing and Descriptor Codes, GC38-1004 


e OSy/VS2 System Programming Library: Storage Estimates, GC28-0604 


e oOS/VS Message Library: VS2 S:stem Codes, 6C38-1008 
e OS/VS2 System Generation Manual, GC 26-3792 

e OS/VS System Management Facil ties (SMF), 6C35-0004 
e oOS/¥S System Modification Pro ram (SMP), GC28-0673 


e OSyVS2 Scheduler and Supervisor Logic, SY¥28-0624,-0625,-0626 
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DISTIIBUTION TAPE 


The distribution tape for the independent component release of JES3 is 
an unlabeled 9-track tapa, written at either 1600 or 6250 BPI depending 
on which was ordered. The basic and optional distribution tares consist 
of two files each, as follows: 


Basic 
e File 1, which contains the installation macros, CR9926 and IRASM. 
For a description on how to code tne CR9926 macro, see "Installation 
Macro Instruction". For this file, specify LRECL=80 and 
BLKSIZE=600. These macro instructions are required to create the job 
stream for processing file 2. 


e File 2, which contains an unloaded sartitioned data set with all the 
object sodules required for J2S3. 
OPTIONAL 


e File 1, which contains JES3 source (symbolics) modules in IEBUPDTE 
format as follows: 


of AUD NAME=LaTxxxx 
For this file specify LRECL=80 and BLKSIZE=8000. 

°e File 2, which contains JES3 macros (in IEBUPDTE® forsaat) as follows: 
-/ ADD NAME=macro-naae 


For this file specify LRECL=80 and SLKSIzZ2=8000. 
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ISSTALLATION £ROCEDURL 


This chapter describes the preparation ana procedure required to install 
JES3 in a VS2, Release 3 system. The Systea “Nodification Proyram (StP) 

is used to install this independent Comronent release. For information 

on SMP, see OS/¥S System Modification Program (SNP), SC20-0673. 


Due te chanyes in the system jeneration macros, the ShP.wSSTORE function 
Cannot be used during tne anstallation of JES3. It is strongly 
recommended that you retain a back-up cory of your system ana 
distribution libraries. You can ase the IZSHDASDR utility projram to 
make a copy of your system and distribution libraries. 


Tne time required to run the entire installation procedure is 
ap[Ccoxigately 4 hours cn the Medel 158. 


Before JES3 can pe installed in your system, you must verify that there 
as ¢nough room 1n your system and distribution libraries to accomaodate 
J=S3 moduies. Figure 1 shows the estimated additional space ana 
directory blocks required in eacn litrary to be updated. (The space ane 
Cirectory blocks jiven are in addition to the VSz, Releasa 4 amounts.) 
Tt also Shows the ,hysical record size (2LKSIZ=) and record format 
(RECFM) for 2ach licrary updated. Tne installation procedure assumes 
that ail aata sets are online. 


ae 1 


| jaagditional {Adaational | Physical { | 
| {Space Used {Directory | Record | { 
{ { (an arn ] | Size H i 
| | ----+--—+---- { |--------—---~~- —|Record| 
juibdrary Name aia oa50 sue Bkoee Used} 2314] 3330(3340]Format} 
| --—---——-- — 4 pnp nn nr th tn rte tenn | 
{[5YS17.AGZNLIB | O11 44 5 | é [1680] 1680{1600[ FE | 
[= SSR4S=—S S542 tern tr ten ter rrr rr +----+----- +----+-—--~-- | 
[S¥Z1.ACS54 { 15 | 9 | WH 4{ 75 ;oT4u4] spe ai U | 
| me th th th th rrr th rth rt +—~--—— | 
| S¥ST.APROCLTE | 1 | 1 | 1 | 1 ano esc nea, FB | 
| --$--- -——- — -- -- 4 - $$ tn nt tte tet 
{S¥S1.J3S3L1e2 | 15 | Y | TH |{ 75 17294, 13030jes60] U | 
{| ------——-----— toto tr tt rrr rrr +--—-+----~-—- t-—--+----— | 
[SY¥S1.PAR4LiIg { 1 {| 1 | 1 | 1 | a a 80] FE | 
(Sao se ee father ten rr 4+--— 4-H 4-----—- | 
{S¥YS1.PROCLIB | 7117) dd 74 1 172801 1296018320} To | 
[== 3 4-—n et —- 4-4 teem t---- fmf | 
{SY¥51.LPALTB )} 10 4 6 | 9 4 39 17294413030; 636o}] U | 
nn nn ne a ee a es me me sr an a a an a ne te et a ere re nee oe cme oereNp | 


Ti,ure 1, Jf33 cstimated Svace Feqguilements in System anu 
Distripution Libraries 
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SMP CATALOGED PROCEDURE 


Eefore you can use SMP to iustall JrS3, you must supply a procedure or 
modify your own procedures to indicate to the SMP projram where the 


required SNP data sets are located, 


where the system ana distribution 


libraries to be updated are located, and where the scratch data sets are 


located. 


parameters of the installation macro instruction. 
be cataloged in S%S1.PROCLIB. 
and ACCEPT SMP functions. 


RECZIVE, 


APPLY, 


The name of this procedure is required in the RiCEIVE 


This proceaure should 
Separate procedures may be used for the 


An example of the JCL and job stream to update SYS1.PROCLIB is as 


follows: 


//33S3SMNP 
// 
//SXS2RINT 
//SYXSUT2 
//SXSIN 
-f 

J /SMPREC 
//SMPSTEP 
//SU2PTS 
//SMEOUT 
//SUPLOG 
//S%2CDS 
//NUCLEUS 
//SVCLIB 
//uINKLIB 
//SMEMACI 
//SEPMAC2 
//SMPMAC3 
//SXSLIB 
-/ 
//SMPACC 
// ACCEPT 
//S4POUT 
//SXYSPRINT 
//SMPLOG 
//SMPCDS 
//SMPPTS 
//SMPACDS 
//SXSUT 1 
//SYSUT2 
//SXSUT3 
//SMPMACI 
//SMEMAC2 
//SBPAAC3 
//SM2CKTL 
//AOSEA 
//AGENLIB 


// DISe?=(OLD,KEZP) 


//APRKOCLIB 


// CISP=(OLD,KEEr) 
ZNCDUP 


-/ 


JOB 
EX=C 
DD 
DL 
DD 
ADD 


Dr 


PGM=ICBUPDTE, PARM=NEW 

SYSCUT=A 

DSN=SYS1. PROCLIb, DISP=SHQ, VOL=SER=S62001, UNIT=3330 
DATA 

LIST=ALL, NAMS=SNPREC 


PGM=HMASMP, PARM='"DATE=U' 

DSN=MVSMPPTS,DISP=CLL 

SYSOUT=A 

DSN=MVSMPLOG,DISP=MOD 

DSN=MVSMPCDS,DISP=OLD 

DSN=SYS1.NUCLEUS, DISP=OLD 

DSN=SYS1.SVCLIB, DISP=OLD 

DSN=SYS1.LINKLIB,D1ISP=OLD 
DSN=SYS1.AOSBA, DISP=OLD, UNIT=2314, VOL=SER=DLIBO2 
DSN=SYS1.AGENLIS, DISP=OLD, UNIT=2314,VOL=SER=DiLIBO2 
DSN=SYS1.APROCLIE, DISP=OLD, UNIT=2314, VOL=SER=DLIBO1 
DSN=SYS1.AOSBA, DISP=OLD, UNIT=2314, VOL=SER=DLI502 
NAMc=SMPACC 


PGM=HMASMP 

SYSOUT=A 

SYSGUT=A 

DSN=MVSMPLOG, DISP=(NCD,K=2=P) , UNIT=2314, VOL=SER=SMPDSK 
DSN=MVSMPCDS,DISP=(OLD,KISP) , UNIT=2314, VOL=SER=SMPDSK 
DSN=MVSMPPTS,DISP= (OLD, KEEP) , UNIT=2314, VOL=SER=SMPDSK 
DSN=MSMPACDS,DISP= (OLD, KEEP) , UNIT=2314, VOL=SZR=SMPDSK 
DiISe=(NEW,DELETE) , UNIT=SYSDA, SPACE= (CYL, (2, 1)) 

DISP= (NEW, DELETE) , UNIT=SYSDA, SPACE= (CYL, (2, 1)) 

DISP= (NEW, DELETE) , UNIT=SYSDA, SPACE= (CYL, (2, 1)) 
DSN=SY¥S1.AOSBA, DISP=OLD, UNI T=2314, VOL=SER=DLIBO2 
DSN=SYS1.AGENLIB, DIS P=OLD, UNIT=2314, VOU=SER=DLIBO2 
DSN=SYS1. APRCCLIB, DISP=OLD, UNIT=2314, VOL=SER=CLIBO1 
DDNAME=SYSIN 
DSN=SYS1.40SBA, UNIT=2314, VOL=SER=DLIBOz,DISP=(OLD,KEEP) 
DSN=SiS1. AGENLIB, UNIT=2314, VOL=SER=DLIBO2, 


DSN=SYS1. APROCLIB, UNIT=2314,VOL=SER=DLIB01, 


FROC SUPREC ASSUMES SME DATA SETS AR= CATALOGED. 
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PROC SMPACC REFERINCES SMe DATA SiTS VIA VOL AND UNIT. 


-Tne SMP data sets und system libraries are located on a 3330 
direct-access device with a volume serial number of S$32001. The 
distribution libraries are located on 3330 direct-access devices with a 
volume seria? number of DLISO1 and DLIZO2Z. all of these data sets must 
be online when installainy Jzs3. 
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SAE DATA S=Ts 


Allocate nuli feacDS, SHPCDS, SherTS, and SMruOG data sets ensuriny 
agifferent names than those on your active SM?. Allow at ieast 15 
cylinders for tne SaHFcte data set in orager to PECEIVE tiie JFS3 systea. 
hake sure that oniy the new si? aata sets are used to install J2S3. The 
JZS3 StieaAltDS can be copied to tue system S¥PCDS after the staje If 
system generation of J253 has been applied to tie current Sk uata 
sets. This 1s to update the SUPCUC to reilect the ap,lication of the 
J2353 ICz. 


Wren running the SuP job stream to install JiS3, you aust have the 
SueACDS, S#PCDS, SMPLOG, and SHPPIS data sets online. Ti addition, dota 
a NULL CLS and a NULL Pfs 15 required, The estimated additional space 
used by tie SAP Cata sets are as follows: 


(rn nnn nr a nny 
{ {Additional Space { { { 

{Used (in tracks) {Physical} | 
} SM2 Data |-—-------—-—---~---—---—-----—-|Racord |Record| 
| Set {2305-1/ 2305-2/2314 | 3330), 3340 | Size {(rormat{ 
I- mh sh nth thn th tnt 
} SMPACDS | 31 21 21 71 24 = 80 | F | 
|} SMPCDS | 9 | 5 |] & | 4 | 8 | 80 { F t 
| SMPLOG | 21 | 14 | 26 | 13 | 23 | 260 | vo 
| S&PPTS | 9 | 51 of 4747 8 {[ 89” { FB | 
Gree st ca Sr eee 


An example of the job stream needed to update the PIMAX field is as follows: 


//USERJCB1 JOS See % 
S/STEP Zaic PGh=HMASHP 
A//SUSPRINT DE SYSCUT=A 
//SMEOUT Dic SYSOUT=A 
//SM2LOG cL DISP=M0D,DSN=SMPLOG 
//SMPCDS DD DISP=Ou0 ,VSN=SHPLCDS 
//SYSUTI1 BL DISP=N=IW,SPACS= (CYL, (1,1)) ,UNIT=SYSDaA 
//SBPCAWTL co * 
UCLIN. 
REP SYS SREL(Z030) NUCIL(s) PEMAK (000). 
wo“ DUCL. 
/* 


Tne minimum value allewed for the PEMAX field in the SMPCLS data set is 350. 


INSTALLATION HACKO INSTRUCTION 


The installation macro instruction is in the first file of the 
distribution tape and is used to create the job stream to install J5S3. 
Tae format of the installation macro instruction is: 


Operation O,-erand 


C29926 ( saCCEPT=procaane } 
tL -AP2ut=procnane J 
r,cOMPACC= (adname[,... ]) J 
( -COuPAPP= (adnaae[,... ]) ] 
{ -CRPA2Z=, 9219001976250} ) 
( ,CRUNZT={ unit} 2400}] 
sPROCESS= (RECSIVElL , APOLY JL , ACCEPT ]{ , SCRATCH }| ALL) 
{ -FORCZ={ 90{L25}] 
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( -PRNICLS=A] 

{ »-PNCECLS=3 j 

[ ,RECZIVE=p rocname ] 
7RSL=J=ESBE 
pWKIUNIT=1unit,#K1VOL=volume 

( -WK2UNIT=unit,WK2VOL=volume ) 


hate: Underscere indicates cefauit. 


CRII20 
is the name of the anstailation macro instruction. 


ACCEPT=procnane 
specifies the procedure name for the SMP aCC=PT function. This 
parameter must Ee specified if PROCESS=ACCEPT or Auk. Fer 
information on the required catalo,ead procedure, see "SMP Catalojed 
Procedur>." 


APPLY=procname 
specifies the -rocedure name for the SuP APPLY function. This 
parameter must be specified if PROCESS=APPLY.or ALL. For information 
on the required catalojed procedure, see "SNP Catalojyed Procedure." 


COMPACC= (ddrame{,... J) 
allows you to specify whicn distribution libraries you would like 
coaptessed before they are gsodifiea. The distrioution libraries that 
cannot be sjecifieu in this parameter are SYS1.AGENLIS, SYS1.AHESLP, 
SY31.AMACLTE, and SiS1,ASAHPLIL, The ddname 1s the ddnane required 
by Soe which is the lowest level index nage in tue taryet library. 
For example, use AOSEA for SY¥S1.AO0SBA. 


COMPAPP=(ddnane({,... J) 
allows you to specify which system libraries you would lixe 
compressed before they ere podifsed. The system libraries that 
cannot bz specifieu in this parameter are SYST.HELE, S¥YS1.MACLIb, and 
SYS1.S\MPLIB. You should not compress SYS1.LINKLii if you are 
nodifyanj tne current system. The ddname is the ddnaae required py 
SMP whach is the lowest level index name in tue target library. For 
exXaapie, use WUTLEUS for SYS1.NUCLEUS. 


Number of tracks and tae density of the distribvuticn tape. 


CaUALTHaf unit) 2409 } 
iS aN cpticnal parameter that specifies the tyje of tase unit on 
which the distribution tape is to pe mounted. If CRUNIT is hot 
ecded, 2400 is the Gefauit. 


PROCESS= (S2CIIVEL APPLY JL ,ACCIPT) ,2CRALCH JI} ALL) 

This parameter defines the functions to be performec in the cLreated 

Sap job streaa, 

RICEIVE - checks prerequisites anc does ali necessary updates for 
later Sile functions. This must be the first function 
performed before any other SMP function is executeu. If 
thas sub, araweter is s;secified, then RECZIVE=procname aust 
also be s,ecified, 


APPLY - specifies ,uttinjg modifications into the system libraries 
of the most recent level of the system. IF this 
subyarameter 1s specified, then APPLi=procname must also be 
specified. 
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ACCEPT - specifies puttiny modifacations into the distribution 
libraries. if this subparameter is specified, then 
ACCSPT=proucnage must also be specified. 


SCRATCH - specifies that the data sets (on the direct-access device 
work volume) copied from fale 2 of the distribution tape 
may be deleted after processing. 


ALL - specifies all of the above. If this subparameter 1s 
specified, then RFCEIVE=frocname, APPLY=procname, and 
ACCEPT=procname must also be specified. 


FORCE={ NOIYES } 
NO ~ specifies that if prerequisites are not met suck as the 
correct release number, the modification is not made to the 
system or distribution library. 


YES - specifies that if prerequisites are not met, the modification 
is still made to the distribution library. 


PRNTCLS=A 
specifies the class associated with the output device to which you 
want your output data set written. | 


PNCHCLS=B 
specifies the class associated witk the output device to which you 
want your output data set punched. 


RSCSIVE=procnare 
specifies the procedure name for the SMP RECEIVE function. This 
parameter must be specified if PROCESS=RECEIVE or ALL 1s specified. 
For information on the required cataloged procedure, see "SNP 
Cataloged Procedure." 


REL=JiESME 
specifies the independent component beinj added to your systen. 


WK IUNIT=unit, WK 1VOL=volume 
are required parameters that identafy a direct-access device and 
volume to be used for work space. The unit may be a device name, the 
actual device address, or a generic name; volume is the volume serial 
nugber. Ten cylinders are allocated on this volune. 


WK2UNIT=unit, #KZVOL=voluae 
are optional parameters that identify a second direct-access device 
and volume to be used for work space. The unit may be a device nane, 
the actual device address, or a generic name. If these parameters 
are not specified, values for WK2UNIT and WK2VOL will be the same as 
for WKIUNIT and WK1VOL. You may expect better performance when work 
Space is divided between volumes. 


CODING THE INSTALLATION MACRO INSTRUCTION 


Fiyure 2 shows the job control language and installation aacro 
instruction. This 1s required to create the SHP job stream to install 
JES3. 


The COPYMACS step in USERJOB1 causes file 1 from the distribution tape 
(which contains the installation macro instructions) to be copied to 
SYSUT2. 


The ASMPARMS ste; in USZRJOB1 causes the definition of the installation 


Installation Procedure 13 


$C28-C670-0, Paye Modified py TNL GN24-2624, Octoner 10, 1975 


macro instruction to be exyanded py the assembler. The figure shows th 
JC ceguired to punch tie SNP job streaw on cards; the output could 
also, however, be @irected to tape or cirect-access vuoluge,. 


//ICRLOAD JOS ,A,NSGLEVEL= (1,1) ,REGICN=512K 
//COPYMACS =XIC PGM=LTEEUPDTS,FARG=NT# 
J//SYSPRINT DE DUANY 
//SYSUT2 DOD UNIT=SY3SDA,DSN=60CRIN, DISP=(N=W,PASS), 
/{ 3PACE= (CYL, (2,1,5)) ,DCS= (L2CLs8C, RECFM=FB,BUKSiZ2= 1600) 
//SNSTN DD UNIE=580,DISe= (CLD, KEE) , VGLUMZ=SER=CRTAPT, LABSL= (1,51), 
// DCB=(LRiCL=60, RECIN=FE, OUKSIZ2=400,D2N=2) 
//ASMPARNS EXEC ASMFC, CARN.ASM="LECK,NOLCAD, LINCCNT=52! 
J/ASM~SYSLIB DD LISP=(OLD,DZLSTZ) ,DSN=SECRIW 
//aSM.SYSQUNCH DD UNIT=580,DISP=(NEW,KSEP) , VOL=SER71CTAPS, 
// wABEL=(,NL) ,oCB= (LRECL=80, RECIM=P, BLKSIZ2=80, DiN=3) 
//hSM.SYSIN [PD DATA 
REPEC 
//LOADICR JCE ,a,REGLION=51ZK,MSGLEVEL=(1, 1) 
CR9926 CRTAPL=9/600, CRUNIT=540, PROCESS= (RECEIVE, ACCEPT, SCRATCH) , 
RECEIVi=SMPREC, ACCEET=SMPACC, PRNICLS=i, 
FORCE=iES, 
PNCHCLS=5, WK 1UNIT=2314, WK IVOL=ASPUTG, WK2UNIT=2314, 
aK2VGL=ASPUTO, RSL=JISME 


tt 
Lee] 


/* 


Figuce Z. Sample JCL and Instaliation Macro Instruction 


e 


ee He 


The AS#.SYSIN DD statement identifies the remainder of the statements as 


input. The REPRO instruction causes the statement that follows, 
USZRJOB2, to re reproduced in the created SHP job stream. 


USZR2IJ03B2 executes the SME jot stream created in the aSMPARMS step in 
USZRJOB1. All tie data sets to be upéated and the required SMP data 
sets should Le online during this job. Tne job stream causes: 


e File 2 to be copied from the distribution tape to a work volume. 


e The RFCBIVE function of SMP to be executed. This function checks 
prerequisites and aoes all necessary updates for later SMP 
functions. This occurs because PROCESS=RECSIVE is specified in the 
CR9926 macro. 


® The FORCE function of SMP to be executed. This torces the 
appropriate modificaticn to be made to the distribution libraries. 


e The data sets on the work volute containing file 2 from the 
distribution tape to be deleted. This occurs because PROCESS=SCRATC 
is specified in tne C299Z0 Macro. 


e The COMPAPP and COsraACC function of SMP to be executed. This 
compresses the indicated libraries. 


e The generated job stream must be edited before it is run to install 
the JES3 ICR. The workaod data set must have tne SPACE ,arameter 
filled in. 


The following sample job stream was generated by the CR9926 macro. JCL 
was added to scratch and allocate new null SMP data sets, and to update 
tne null CDS to accept the ICR. The //EXEC SMPREC and //EX=C SMPACC 
cards also created by the CR9926 macro have been removed and the 
procedure JCi inserted for purposes of illustration. Tke added JCL 
statements are enclosed in boxes. Not all SMP control statements 
yenerated are illustrated. If the installer wisnes to use the 
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Procedures created by executing tne example on page 9, the //ZxEC cards 
should not be removed and the procedure JCL should not be piaced : 
inline. 


MSGLIVEL=(1,1 


LOADICR JOb A, REGION=512K 
4/ EazC PGN=IEHPROGB 
//SYSPRINT DCL SYSOUT=A 

//ONE cD UND T=2314, VOL=SLR=SEFDSK,DISP=OLD 

7/TAO cr UNIT=2314, VOL=SiLR=DLIBO02,DISP=OLD 

S/SYSIN cp * 

//* THE FOLLCWING JCL WAS ADDED TO SCRATCH OLD DATa S3TS AND 
7/* ALLOCATE NEW NULL SMP TATA SETS ANE DLIE (AOSBA) 

SCRATCH DSWAME=MVSMPCDS, VOL=2314=SMPDSK, PURGE 

SCRATCH DSNANZ=NSMPACDS, VOL=2314=SHEDSK, PURGE 

SCRATCH DSNAME=MVSMEPTS, VOL=2314=SMPDSK, PURGE 

SCRATCH DSNANZ=SVSMPLOG, VOL=2314=SMPDSK, PURGE 

SCRATCH DSNAMNE=SYS1.AOSBA, VOL=23 14=DLI502, PURGE 


// EXC  PGM=IEFBR14 
VAAN DD DSN=SYS1. AOSBA, UNIT=2314, VOL=SER=DLIBO2,DiSP=(NEW,KEEP) , 
// SPACZ= (CYL, (20,5,500)) 
7/8 cD DSN=MVSSPPTS, UNIT=23 14, VOL=SER=SMPLSK,DiSP=(NEW,KSEP) , 
// SPACE= (CYL, (20,5, 1000) ) 

“sc ED DSN=MVSMPCDS, UNIT=23 14, VOL=SER=SMPDSK, DISP=(NEW,KEEP) , 
// SPACE=(CYL, (20,5, 1000) ) 

Vee cD DSN=NSMPACDS, UNIT=2314, VOL=SER=SNPDSK,DISP=(NEW,KEEP), | 
// SPACE= (CYL, (20,5, 1000) ) 
77D cc DSN=MVSMPLOG, UNIT=23 14, VOL=SER=SMPDSK,DISP=(NEW,KEED), 
// SPACE= (CYL, (20,5)) 
/* 


7/7* FOLLOWING JCL 15 GEN=RATED BY INSTALL MACRO. 
//MOVE EAEC PGM=IEBCOPY 
//* 


//***8* LOAD THE PACKAGING DATASET(S) TO A DASD WORK VOLUME 
//* 


//SXSUDUNE DD SYSOUT=A 

//SXSPRINT DL SYSCUT=A 

//SYSUT3~—soCD UNIP=2314,VOL=ScR=ASPUTO, 

// SPBCE=(TRK, (5,2) ) 

//SXSUT4 ~=—oCE UNIT=2314,VOL=SCR=ASEUT6, 

// SPaCE=(TRK, (5,2)) 

//PAKI 3D UNIT=2314, VOL=SZ2=aS PUTO, DISP=(,KEZP) ,DSN=PAK1, 


// SPACE= (C¥E,(30,1,300)) 
//* THE SPaC= ALLOCATION FOR PAK1 MUST BE MADE IT IS NOT 
//* sSSNERATEL BY THE INSTALL FAC3O, 


7/721 Dp UNIv=580, VOL=SEa=CRTAPT,DISP=(OLL, PASS) , LABEL=(2,HL), 
// DCB=DEN=2 
//SYSIN re * 


COPY Tuie=rP1,OUTTi=rakI 


FOuLCwlwsS SAP JCu Wat cus 0 
//* RECEIVE THEE ICR. 

Jf51 eaccd PGM=dLASEP 

//SAEQUT CL SYSCUT=a 

S/SMELOG Cc DSN=MVSMPLOG, OTS P=M0L 


ADLEsD ¢£O UriaTt THE NULL 


J/SH2C2S OED CSN=MVSMeECLS,DISP=OLL 

//SBERTS EL DSN=¥VSiPPIS,DISP=OLL 

//SHECHTL DE DDNAME=SYSIN 

//SXSUT1 —oCL DISr=(,LELETS) , UNIT=SYSDA, SPACE= (CYL, (10, 10)) | 

//SXSIN DD * | 
UCLIN . | 
ADD S¥S SREL (2030) NUCID (8) . 
ZNDUCL . 

/* 

J/P1 255C  PGM=KNASMP 
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//SMPOUT DE SYSOUT=A 
//SMPLOG ODD DSN=MVSMPLOG, DISP=MOD 

//SMPCDS DD DSN=MVSEPCDS,DISP=OLE 

| //SHEPTS rs DSN=MVSMPPTS, DISP=OLD 

//SMPCNTL DD DENAME=SYSIN 

//SXSUT1~=—DE DISE=(,DELETE) , UNIT=SYSDA, SPACZ= (CYL, (10,10) ) 
\//SYSIN DD * 

UCLIN . 

| REP SiS PEMAX (500) . 

ENDUCL . 

ys 


/7/* FOLLOWING INLINE JCL ADDED TO RECEIVE THE ICR. 
//* (UT IS USED IN PLACE OF //FXEC SMPREC PROC, 

//SMPSTZP EXEC PGM=HMASMP, PARM="DATE=U! 

//SMPPTS DD DSN=MVSMNPPTS,DISP=CLD 

//SMPOUT DD SYSOUT=A 

//SMPLOG LD DSN=MVSMPLOG,DISP=MOD 

//SMPCDS DD DSN=MVSMPCDS,DISP=OLD 

//NUCLEUS DD DSN=SYS1.NUCLEUS,DISE=OLD 

//SYCLIB LD DSN=SYS1.SVCLIE, DISP=OLD 

//LINKLIB CD DSN=SYS1.LINKLIB,DISE=OLD 

7/SMPMAC1 DD DSN=SY¥S1.AOSBA, DISP=CLD, UNIT=23 14, VOL=SER=DLIB0Z2 
//SMPMAC2 CD DSN=SY¥S1.AGENLIB, DISP=OLD, UNIT=2314, VOL=SER=DLIBO2 
//SMPMAC3 LD DSN=SYS1.APRCCLIB, DISP=OLD, UNIT=2314, VOL=SER=DLIBO1 
//SXSLIB [CD DSN=SYS1.AOSBA, DISP=OLD, UNIT=2314, VOL=SrR=DLIEO2 
// cL DSN=SYS1. AGENLIé, DISP=OLD, UNIT=2314, VOL=SER=DLIBO2 
11 LD DSN=SYS1.APROCLIB, DISP=OLD, UNIT=2314, VOL=SER=DLIBO1 
7/SMPCNTL CD DDNAME=SYSIN 

//SXSUT1 [D UNIT=SYSDA,SPACE=(1700, (600, 100) ) 

//SYSUT2 ED UNIT=SY¥SDA, SPACE=(1700, (600,100) ) 

//SYSUT3—soDD UNIT=SYSDA,SPACE=(1700, (600, 100)) 

{Z/SYSPRINT DD SYSOUT=A an esterases 

7/* FOLLOWING JCL AND SMP CONTROL STATEMZNTS GENERATED EY TH= 

//* INSTALL MACRO. 


//PAKI cD UNTY=2314, VOL=SER=ASPUTO6, DESP=SHR,DSN=PAK1 
S/SXSIN or * 
RECSIVE S=LecT (UZ99926). 
/* 
//SSPPTFIN CL * 


++ PTF (UZ99926) . 
++ VER (2030) 

/*JES3 PTF VS 2-34/, 
++ MOD (IATABMN) DCISTLIB (ACSBA) LKLIB (PAK1). 
++ MOL ({TATABNA) DISTLIB (AOSBaA) LKLIB (PAK1). 
++  #OD (IATWSN) DISTLIS (AOSPA) LKLIB (PAK1). 


++ MOD (IATWTN) DISTLIS (AOSBA) LKLIB (PAK1) 
TALIAS (IATHI11). 
++ MOD (IATWXN) DISTLIZ (AOSEA) LKLIB (PAK1). 
++ MOD (IATWYN) DISTLIB (AOSBA) LKLIB (PAK1). 
++ MAC (SGIAT6PA) DISTLIB (AGENLIB) TALIS (Pak1). 
++ MAC (SGIATSPR) DISTUIB (AGZNLIB) TALIB (DAK1). 
+# MAC (SGIATSJL) DISTLIB (AGENLIE) TXLIB (PAkK1). 
+# MAC (SGIATGJL) DISTLIB (AGENLIzZ) TALIB (PAK1). 
++ MAC (SGIATSSI) DISTLIB (AGENLIB) TXLIE (PAK1). 
++ SAC (JESC) LISTLIB (APROCLIE) TALZB (PAK1). 
* 
//* FOLLOWING INLINE JCL ADDED TO acCEeT THs JES3 iC aNb FORCs if 
//* TO THE APPROPRIATE DLIBS. IT IS USED IN PLACE OF /yvEXEC SMPACC PROC. 
//ACCEPT EXEC =—- PG L=HMASNP 


//SMPOUT DD SYSCUT=A 
//SXYSPRINT DD SiSCuraa 
//SEPLOG co DSN=MVS4PLOG,DISP=(MOD,K=IEP) ,UNTT=2314,VOL=SZR=SMHPDSK 
//5%PRCDS CL DSN=UVSEPCDS,CISP= (CLU,KSEP) ,UNIT=2314, VOL=SEP=SMPDSK 
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//S42PTS Bo DSN=MVSMPPTS,DISP= (CLD, KEEP) , UNIT=2314, VOL=SER=SMPUSK 
7//SMRACDS DD DSN=MSMPACDS,DISP=(OLD,KZEP) , UNIT=2314, VOL=SER=SMPDSK 
//SXSUT1 DD DIS?= (NEW, DELETZ) , UNIT=SYSDA, SPACE= (CYL, (2, 1)) 
//SXSUT2 ~~ DE DISP=(NEW,DELET£) , UNIT=SYSDA, SPACE= (CYL, (2, 1)) 
//SXSUT3. DD DiSe=(NEW,DZLETS) ,UNIT=SYSDA,SPACE= (CYL, (2, 1)) 
//SMPMAC1 DD DSN=SYS1.AOSBA, DISP=OLD, UNIT=2314, VOL=SER=LLIBO2 
//SMPMAC2 DL DSN=SYS1.AGENLIB, DISE=OLD, UNIT=2314, VOL=SER=DLIBO2 
//SML24AC3 DBL DSN=SYS1.APROCLIB, DISP=OLD, UNIT=2314, VOL=SDR=DLIBO1 
//SMPCNTL DD DDNAME=SYSIN 

//AOSBA DP DSN=SYS1.AOSBA, UNIT=2314, VOL=SER=DLIB02,DISP= (OLD, KEEP) 
//AGENLIB DD DSN=SYS1.AGENLI2, UNIT=2314, VOL=SER=DLiBO2, 


// DISP= (OLD, KEEP) 
//APROCLiB DD 

// DISP=(OLD, KEE? 
7/* FOLLOWING JCL AND SMP CONTROL STATEMENTS GENERATED BY THE 
7/* ICR iNSTALL MACRO. 

//PAKI DD UNIT=2314, VOL=SER=ASPUTO, DISP=SHR, DSN=PAK1 
//SXSIN DL * 

ACCEPT SELECT (UZ99926) FORCE . 

//* THE FORCE KEYWORD IS NOT INSERTED 3Y THE INSTALL MACRO. 
//* IT MUST BE ENTERED BEFORE THZ ICR IS INSTALLzD. 


DSN=SYS1.APROCLIB, UNIT=2314, VOL=SER=DLI501, 


/* 

//CLEANUP EXEC PGM=IEFBR14,COND=EVEN 

//* 

//»*e8* DELETE THE PACKAGING DATASET (S) 

//* 

//SYSUDUMP DE SYSCUT=A 

//CLEAN1 DD DSN=PAK1, 

// DISP=(OLD, DELETE) , UNIT=2314, VOL=SER=ASPUT6 

/* 

For any SMP errors, see OS/VS System Modification Program (SHP). For 
any system errors, see OS/VS Message Library: JV¥52 Systea Messay2s and 
OS/¥S Message Library: Routing and Descriptor Codes. 


This section describes the procedure for ferforming a JES3 generation 
and a remote terminal processor program (RMT) generation in an OS/VS2 
Release 3 system. 


The process of jeneratiny JES3 is referred to as JES3 generation. The 
process of generating the remote terminal processor programs to operate 
in a JES3 system is referred to as RMT generation. Before you do a JES3 
or RMT generation, you should be familiar with the Release 3 edition of 
tne OS/V¥S2 System Generation Manual, GC26-3792. 


Se SS Se 


PIF REQUIREMENTS 


OS/VS2 Release 3 PTF number UZ00809 contains JES3 system jeneration 
support. <It must be upplied as a prerequisite to a JES3 yeneration. 


DISTRIBUTION LIBRARY 


Distribution data set SYS1.AOSBA (created during installation of ICR via 
SUP) must be cataloged in the qenerating system. 


Installation Procedure 16.1 


GC28-0670-0, Fage Modified by INL GN28-2624, October 10, 1975 


SYSTEM GENERATION MACRO INSTRUCTIONS 


A hew macro instruction, JES, has keen defined and must be used for JzS3 
yeberation., In addition, a few new parameters and options have been 
added to existiny system generation macro instructions. The JES macro 
instruction will be described in detail, whereas only the applicable 
parameters and options of the existing macro instructions will be 
described. 
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JES Macro lustruction 


The JES macro instruction is used to specify the confiyuration for 

JiS3. The Jo5 macro supplies information to generate a pasic J?S3 
initialization. deck waich is added as the JES3INxx seaber ot 
SYS1.2ARMLIB, where xx is equal to the PARMID paraaeter. in addition 
tua JES macro causes JCL to be created which, during Stage TI will be 
used to copy the JIS3 pember from SY¥51.APROCLI65 to S¥S1.FROCLIS ana copy 
and/or linkedit the appropriate otject modules into S¥S1.LPALIB ana 
SYS1.J=ES3LIc. 


Tce follcwin, xeyword parameters are used for the JES Bacro instruction: 


{ LOCLIES={NO}JYES)) 

( PROCID={ JES3 |p rocedure-naae } j 

( PARMID={ 00 |; armiib-member-default } 

{ RDOR= ({ O0C| rdr-device-address]},...) 

( PRT= (({QO0E]prt-device-address},{14 

{PN |print-trairj),(...)) ] 

( PUN=({ OOD] punch-device-addressj,...) ] 

(CNS=(({ 0 1F |[console-device=address },{ 3215|console-tyje}).(---)) ) 
D3330= (device-address,..., (device~address,n),...) 

(D2314= (device=address,..., (aevice-~address,n),...) J 

{ 13400= (device-address,..., (device-address,n),...) } 

( T2400= (device-address,..., (device-address,n),...) J 


) 
] 
O3|prt-device-type}, 


Note: Underscore indicates default. 
Tue keyword definitions follow: 


LOCLJIS - defines whether or not the system peing generated will be used 
only as a Ji53 local processor. 


If LOCLUES=NO is specified, a JES3 anitialization deck is acded to 
SYS1.PARMLIB (se2 the PAREID keyword below for meuber nazes), the 
JES3 object projram is Copied froa tke J253 distripution library to 
tne SYS1.JES3LIB data set (this data set aust be catalogec), and the 
JES3 procedure is copied from the JES3 distribution library to 
SYS1.PROCLI3 (see the PROCID keyword below tor the member name). 


If LOCLJZS=¥=2S as specified, only the J2S3 procedure is copied fro 
tre JES3 distribution library. However SYS1.JIS3LIB gust oe 
catalojed prior to executing JiS3. 


PROCID - uefines the name of the JES} procedure in SYS1I.7ROCLIB. his 
Name must correspond wath the name defined as PRIsUS on the SCHEDULR 
syStem jeneration macro instruction. 


PaRMID - defines the suffix to the SYS1.PaRMLIB wember naae anto which 
the JES3 anitaalizataon deck will te added. PAR&MID can be 
alphanumeric but aust consist of 2 characters. 


RDR,PRT,PUN,CNS - defines the wnit record devaces for JiL3. JES3 device 
names ife assigned to each device, for -xampie, ACR=(00C,01C) would 
cause the iiame RDOOC to Le assigned ta 00C, and RDOIC to O1C, 

Note: 29R and PUN must be 2540 type devices. 


D3330,72314,13400,T24U0 - defines the direct access stora,e devices and 
tape devices to be sanaged by JzS3. A string of device addresses can 
be defined by (address,n) wher2 nis the number of s2quentaal 
addresses to be assigned, ior example ¢3330=((130,6),(230,5)) defines 
3330 DASE cevices at addresses 130-137 and 230-237. The £3340 
keyword 1S required for J?253., 
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Each J2S3 console should be generated as a cevice on each processotr 
(where physically possible) for dynanic system anterchanye (OST). In 
addition, each J5S3 console with input capability should be yenerated as 
a multiple console su,;fort (H#CS) secondary console on each processor. 
Khere this 1S not fpossiple, Gumay secondary consoles should be definea,. 
MNCS secondary consoles are sjecified in the CONSOLE aacro during system 
jeheration. Cummy secondary consoles are generated by specifyiny, 
FYPZ=JSS on the CONSOL= macro. Wren a dumay console is defined using 
TYPT=JES the only other CONSOLE carameter which 1s accested for that 
dumay console 1S VALeUMDS=. 


Generatinj a device creates a anit control block (UCB). Generating a 
secondary console creates a unit centre] module (UCh) entry. Jis3 
requires a UCcH for each console on the global precessor in oraei to 
physically issue 2/70. if a J=S3 console operator wishes to communicate 
with MVS on 4@ given processor, then a UCM entry must exist on that 
processor for tiat console. For example, a UCM entry must exist on tue 
processol namea S¥2 for consoie O40, if the operator at that JIs3 
console wanted to issue the following command: *Tf SY¥2 DA. The command 
woulda then be processed and the response sent back (across the 
channel-to-channel (CTC) aaapter, if necessary) to the consele at O40. 


The UNIT parameter of the CONSCLE initialization card specifies an 
address on each ;rocessor for 2acr console, if there is a UCN on the 
processor for that address, then the Console can communicate witi that 
processor. it makes no difference what the UCM looks like; 1t may Lave 
been created for graphic console, kut as being used by a JES3 2740. The 
UCN is only used for routin, of ReSsajes, 


If at is not Lhysically possible to yenerate reali secondary consoles on 
a jiven frocessor due to configuration restraints, then dummy UCE 
entries shoula be generated. Unsujh UCM entries shoild be yenerated on 
each processor to handle the maximum nuaber of JES3 consoles on any 
jiven system, If JES3 consoles aire added to the configuration after the 
JZS3 generation bas been completed, they may be used as JiS consoles 
Without doiny a new JLS3 generation by; siapiy adding a console card to 
the J=53 anitialization deck. Poese consoles will not, however, be able 
to communicate with 4VS, unless extra dummy UCM entries had previously 
been jenerated. 


Two JES3 consoles, one with a real UCM anu the other with a dummy UCH, 
will have identical capabilities communicatang with JfiS and MVS. The 
difference is that the former muy be used a5 a MCS console, at times, 
wnile the latter may not. 


On the global processor, a Console anu its Correspondinj UCK may not be 
used by SCS and G2S3 simultaneously. The console nust be offline to iicS 
before Jz53 is initialized for Jis3 to allocate the device. The only 
exception is for terminals similar to the 1052 (such as tne 1052, 3210, 
and 3215), which may be sharea., in this case, however, Care must be 
taken to insure tnat MCS and J2S4 jo not both issue the same message to 
the same console. 


Cn a local processor, the UCM may ke shared with an active “CS console 
on tnat processor and a JES3 console on the global ;rocessor without any 
problem, Any wWrite-to-operator (hTO) message issued on tne local for 
the UCM an guestion will be sent .oti. ta the active MCS console on the 
local and the JES3 console of the glonal. 
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DATASET Bacto Iastryuction 


Some or all of the system data set; can be defined either during systen 
generation, by using the DATASET macro, or before system jeneration, by 
using JCL andyor the access aethod services. This section contains 
information about the JES3LIB system data set and about defining it 
using the DATASET macro. 


The DATASET macros that you code with a SPACE parameter are used during 
system generation to allocate and jefine the system data sets. During 
Stage I, the macros are assembled and expanded into the job control 
language and commands required to 2xecute the access method services. 
During Stage II, the expansion is used to allocate the specified space 
on system volumes and catalog the system data sets in the master 
catalog. The first system data set that is created (if specified ina 
DATASET macro) is the msaster catalog. Then, space is allocated to the 
remaining system data sets and they are cataloged. Also, if you 
specified an index in the GENERATE macro other than S¥S1, all of the 
systea data sets are renamed during Stage II from the index you 
specified to SYS1. 


The following is an example on how to define the JES3LIB systems data set 
using the DATASET macro. 


JES3LIB DATASET JES3LIB, VOL=(SG2001, 2314) , SPACE=(CYL, (15,2,75)) 
The following describes the SYS1.JES3LIB data set. 


SYS1.,JES3LIEB is a partitioned data set that contains all JES3 sodules 
except the suksystem interface modules that reside in SYS1.LPALIB. It 
is required if running JES3. 


This system data set must be on a direct-access volume, which can be the 
system residence volume, and gust be cataloged. Secondary space can be 
allocated. If this system data set is used, a DATASET macro nust be 
specified for it, even if it has been pre-defined. If it has been 
pre-defined, omit the SPACE parameter in the DATASET macro. By omitting 
the SPACE parameter, space will not be allocated. 


It is recommended that the following DCB subparameters be specified: 


RECFM=U,BLKSI2Z5=14136 for 2305 model 1, 
14660 for 2305 model 2, 
7294 for 2314/2319, 
13030 for 3330/3333, or 
8368 for 3340 


The Access Method Services or JCL can be used for cataloging. 


In a JES3 loosely-coupled multiprocessing configuration (for example, a 
global processor connected to local or ASP main processors through the 
CTC adapter), the UNIT=CTC option sust be specified fcr all cTC 
devices. 
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SCHEEULR Macro Instruction 


JES3 is identified as the frimary job entry subsystem by specifying 
PRISUB=JES3 on the SCHEDULR macro instruction, and is generated by 
specifying the JES macro instruction. 


QNZTNANE Nasko lastruction 


The interface between MVS allocation and the main device scheduler 
function of JES3 (MDS) depends on HVS being able to distinguish class 3 
devices from class 1 and 2. Class 1 devices are those on which volure 
mounting is controlled by MDS. These devices will have the UCBJES3 bit 
on in their UCB's. Class 2 and 3 devices will not have the UCBJES3 bit 
on. The Class 2 devices are described in JES3 initialization DEVICE 
cards (as are Class 1) and represent devices on which permanently 
resident volumes are mounted. Since no volume mounting is required MDS 
provides data set integrity by managed access to nontemporary data sets 
on these volumes. Class 3 devices are those unknown to JES3. The MVS 
allocation routines require that the class 3 devices be contained within 
their own HVS subygeneric groups (that is, class 3 devices cannot be in a 
subgeneric group which contains class 1 cr class 2 devices). For 
completeness a brief desription of subgeneric groups follows: 


subjeneric Groups 


JES3 devices can be grouped by using generic and esoteric names. 
Generic names are defined in the follcwing manner: 


e The IODEVICE system generation macro instruction describes the 
characteristics of an IyC device and its system requirements. The ® 
UNIT parameter specifies the gener:..c device type (for example, 
3330). 


e The UNITNAME system generation wacio instruction is used to assign 
a name to a collection of IyC devices. The NAME parameter 
specifies the esoteric name to be assigned to the group of devices 
(for example, SYSDA). The UNIT pa::ameter specifies the addresses 
of the devices that will be recognized by the assigned name. In 
order for a device to be referred -:o by other than its generic 
name, the device must be specified in the UNITNAME macro 
instruction. 


Generic device types are divided into suogeneric groups as illustrated 
in Figure 3. The existence of subgeneric groups allows MV¥S allocation to 
serialize on a subset of units within a generic. For example, using the 
figure below, when 3330A is requested, allocation needs to reserve only 
device group #4, rather than all 3330 devices. As a result, more than 
one allocation can process the same generic group as long as the 
allocations require (‘ifferent subyeneric yroups within that generic. 


The guidelines by wh:ch the system determines subgeneric groups are: 
e If a user-assigned name (for example, SYSDA) includes different 


generic device types, the units in each generic belong to different 
subgeneric groups. 
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e If a user-assigned name (for example 3330A) includes only a sukset of 
the units in a generic, that subset is a distinct subgeneric group. 


*¢ The intersection of any subgrougs is a distinct subgeneric group. 
For a more detailed discussion of MVS allocation and device groups refer 


SY¥28-0625. 
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Figure 3. Subgeneric Groups 


When an esoteric or generic name i:;s to be managed by JFS3, one or more 
of the subgeneric groups that comprise that name must be defined to JES3 
via initialization DEVICE cards. The only restriction is that if one 
unit of a subyeneric yroup is defined to JES3, then all the units in 
that subgeneric must be defined. This will prevent a subyeneric group 
from containing both class 3 devices and class 1 (or class 2) devices. 
Not all of the subgeneric groups of a given name have to be defined to 
JES3, and therefore, an esoteric or generic name can contain class 1, 2 
and 3 devices where a subjeneric group cannot. If the number of class 1 
and 2 devices is subject to change (that is, on a shift basis) or future 
expansion is anticipated, additione] names should be generated for each 
desired combination. 
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SANELZ JES3 ERQCESSING TQ RUY GLOEAL ONLY 


The following is a sample JES3 frocecure. 
//TEFPROC EXEC PGM=IATINIK 

//STEPLIB CL CSN=SYS1.JES3LIB, DISP=CLD 
//SPO0L1 CD DSN=SYS1.JESPACE,DISF=CLD 
//CHKPNT [CD DCSN=SYS1.JES3CKPT, DISP=OLD 
/7/JESIOUT DD UNIT=004,UCS=P11,FCE=8 
/7/JES3ISNAP CL UNIT=AFF=JESIOUT 
//SYSABEND DD UNIT=AFFSJES30UT 

//JESABEND CD UNIT=AFF=JES3IOUT 

7/TEFDATA DD DUMMY 

//TEFRDER CD CUMMY 

//TEFPRDST ODD DSN=S¥S1.xxxx,DISP=SHR 
//JES3IN OCD LSN=SYS1.PARMLIE(JES3INCO) ,DISP=SHR 


where; xxxx is an allocatec and unused data set (not PROCLIB) 


RET GENERATICN 
The procedure to generate OS/VS2 JES2 RMT programs or workstations in an 
active JES3 system follows: 


1. Make sure that the SYS1.A0SH1, S¥Si.AOSH2 and SYS1.AMACLIB data sets 
are cataloged in the generating system. 


2. Prepare the options deck for the workstation to be generated. 
3. Issue the JES3 command: *xX INTRDR 
4. Issue the command: S JES2GEN, MODULE=JES3J0B 


System Response: 00 SHASP9OO ENTER JES2GEN OPTICN CHANGES, CARDS, 
UPDATE OR END. 


Enter: Rk 0,&BSCCPJ=YES 

System Response: 00 &BSCCPU SET TO YES 
Enter: R C,SELECT=HRTPOPTS 

System Response: )0 SELSCT SET TO HRTPOPTS 
Enter: R 0,END 


System Response: v0 S$HASP9CO ZNTER JES2GEN OPTION CHANGES, CARDS, 
UFDATE OR END. 


Enter: R& 0,&MLEFSIZ=value 
This parameter is used to speci:y the size of the line 
transmission bkuffer that the wo) kstation will use to send data to 
and receive data from JES3. The buffer size chosen aust be the 
same as that specified on the RUPTERM card defining this terminal 
to JES3. 

System Response: 00 &EMLBFSIZ SET TO value 


Enter: & 0,SELECT=HRTPxxxx 
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6. 


xxxzx is either of B360, LOAL, S¥S3 or 1130, depending on the type 
of workstation to be generated. 


System Response: 00 SELECT SET T) BRIPxxzxx 
Enter: 2&8 0,END 


Systea Response: 00 $HASP950 PLAC: RMTGEN OPTICHS IN UNIT yyy AWD 
REPLY GO CR CAN-EL 


yyy is the unit address of the card reader. You should make sure 
that the specified card reader is not being used for any other 
function (a JES3 card reader, for example). You should clear any 
cards retaining in the card reider, load the card reader with the 
RMT parameters, and 

Enter: R 0,G0 

If no RMT generations are bein, perforaed, 

Enters R& 0,CANCEL 

Note that the options deck can only specify generation of that type 

of workstation program that you selected earlier. You may generate 

several workstations of that type provided they all use the same line 

buffer size. If you need to generate workstations of several tyres 

and buffer sizes rerun step 4 as many times as necessary. 

Save the asseably listings and the card decks produced. 

After all remote generations are completed, 


Enter: *C INTRDR 
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Sample of a JES2GEN procedure used in a BST generation: 


//3ES2GEN 
//GEMER 
//SYUSPRINT 
//SYSUT1 
//SYSUT2 
//S1SIB 


PROC 
EXEC 
DD 
De 
DD 
Lr 


CLASS=A ,MODULE=JES2JCB 

PGM=IEBGENER 

SYSOUT=A 
DS8=5YS1.PROCLIE (6MODOULE) , DISP=SHR 
SYSOUT= (SCLASS, ,INTRDR) ,.DCB=BLKSIZE=80 
DUSBY 


Sample JES3JOB S¥S1.PROCLIB member: 


//IES3IIOB 


4/ 
//BASPOPT 
//STEPLIB 
//GENIN 
//BASPPTF 
//SYSIN 
//HASPSRC 
“/ 
//PTEPRINT 
//SXSPRINT 
//SYSUDUMP 
//HASPGEN 
//STEPLIB 
//GENIN 
//RASPPTF 
//SYSIN 
//BBSPSRC 
//PTFERINT 
//SYSPRINT 
//SYSUDUBE 
//RMTGEN 
//STEELIB 
//GENPDS 
//SYSIN 


// 
//SXSLIB 
//SYSUT1 
//SXSUT2 
//SXS8VT3 
//SXSERINT 
//SYSPUNCH 
//SXSGO 


4/ 
//CARDIN 


JOB 


"GENERATE OS/¥S2 JES2 REMOTE WORKSTATIONS!, 
MSGLEVEL= (1,1) ,CLASS=A 

PGM= JESIIGEN, REGION= 128K 
DSN=SYS1.AOSH1, DISP=SBR 

UNIT=2540, DCB=BLKSIZE=80 
DSN=SYS1.A0SH2 (HASEETF) ,DISP=SHR 
LSN=SYS 1. AOSH2 (HASPSRC) , DISP=SER 
DSN=66C (SACTIVE) ,DISE=(,PASS) ,UNIT=SYSDA, 
SPACE=(CYL, (12,,2)) ,DCB=SYS1.BACLIB 
SYSOUT=A 

SYSOUT=A 

SYSOUT=A 

BGM=JESIIGEN, REGION= 128K 
DSN=SYS1.A0SH1,DISE= iBR 

UNIT=2540, DCB=BLKSIZ 2=80 
DSN=SYS1.AOSH2 (HASEETF) ,DISP=SHR 
DSN=SYS1.AOSH2(HASPSRC) , DISP=SHR 
DSN=66C (SACTIVE) , DISE= (OLD, PASS) 
SYSCUT=A 

SYSOUT=A 

SYSCUT=A 


PGM=EXRMBTGEN, REGION=256K,COND=((0,LT,HASPGER) , EVEN) 


DSN=SYS1.A0SH1, DISP=SHR 

DSN=66C (HRTPCPTS) ,DISP= (OLD, DELETE) 
UNIT=SYSDA, SPACE= (3200, (200,50) ,,,ROUND), 

DCB= (RECFM=FBS, LRECL=80, BLKSIZE=3200) 
DSN=SYS1.AMACLIE2, DISP=SHR 
DSN=66SYSUT1, ONL T=SYSDA, SPACE= (1700, (600, 300) ) 
DSN=66SYSUT2, UNIT=SY¥ 3DA, SPACE= (1700, (600,300) ) 
DSN=66SYSUT3,UN{(T=SY3DA,SPACE= (1700, (600, 300) ) 
SYSOUT=A 

SYSOUT=B 

UNIT=SYSDA, SPACE=(4C0, (100,50) ,,,ROUND) , 

DCB= (RECFH=FBS, LRECL=80, BLKSIZE=400) 
UNIT=2540, DCB=BLKSIZE=80 
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SIQRAGE BSTIBATES 


This chapter supplies the infcrmation needed to estisate the OS/V¥S2 
Release 3 storaye requirements for the JES3 systea. It also provides 
inforgation about the auxiliary spice necessary to contain the JES3 
system. | 


Figure 4, Storage Estimates by Bodule, provides a table of all JES3 
aodules, their location, their estimated size, and related cosszents. 
Figure 5, Storage Obtained Using AjiETHAIN, provides a table of JES3 
GETMAIN usage and associated algorithgs needed to estimate actual 
storage use. The JES3 storage estimates figures for OS/VS2 use the 
following headings: 


Name - the JES3 module or data area name, 


Loc - the storage location of the sodule or data area. The following 
abbreviations are used to identify the location: 


PLPA pageable link pack area 
JES3 JES3 subpools 0, 251, 252 


Otherwise, the storage subpool nusber is given. 

Size - the storage size in decimal. If not specified, the size is 
determined dynamically based oi: the functions specified in the “JES3 
InitializationySYSGEN algorith': or other considerations" field. 
Hote: In Figure 5, a basic siz: value is provided in order to 
incorporate the GETMAIN information into the JES3 storage estimate 
sugmary. The size value is subject to large variations based on the 
indicated algorithas. 


Fix - Y indicates the module is page fixed; N indicates it is not. 
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! \ { { 13283 System Generation, Initialization, { 
{Module {Size {Loc {Fixfor Cther Variable Considerations { 


bom pe a hth hr rrr rr rr ren err rrr rere rrr e ere eca4 
{IATABMN(05656|JES3|{ N |If JES3 ABENBS, or *X DC with ABEND { 
{IATAEBNA|CO400}IJES3| N fIf JES3 ABENDS, or *X DC with ABEND { 
{IATAENB|03568(JES3| N {If JES3 ABENDS, or *X LC with ABEND | 
{IATABNC|Q1080}JES3}] N (If JES3 ABENDS, or *X DC with ABEND { 
{| TATABND|O1448{JES3| N {If JES3 ABENDS, or *£ LC with ABEND I 
JIATABNE|O2CO8|JES3} & {Lf JES3 ABENDS, or *X DC with ABENT | 
| IATABNF{01368j{JES3{ N |If JES3 ABENDS, or *X BDC with ABEND { 
{IATABNG|01256{J2S3| N |If JES3 ABENDS, or *X DC wath ABEND | 
{IATABNH/O1000{JES3| N {If JES3 ABENDS, or *Z% DC with ABEND i 
(IATABNI(COQ4U56{JES3(| N |If JES3 ABENDS, or *X DC with ABEND { 
JIATABNJ{O00944,/JES3{ N |If JES3 ABENDS, or *X DC with ABEND { 
(IATABNK{01120{J553| N {If JES3 ABENDS, or ¥*X DC with ABEND I 
{IATABNL{01520{J3ES3| N {I£ JES3 ABENDS, or *i DC with ABEND { 
[IATAGNM(03064|JES3| N JIf JES3 ABENDS, or *X DC with ABEND | 
[IATABNN{O2952|JES3| N Jif J&53 ABENDS, or *X DC with ABEND { 
{IATABNX|[03896,J5S3| N JIf JES3 ABENDS, or *X DC with ABEND | 
(IATABNY|O03456|JES3| N {If JES3 ABENDS, or *X DC wath ABEND \ 
}IATABNZ{(01616,J2S3} N jIf JES3 ABENCDS, or *X DC with ABEND { 
{IATAKNO(030721JES3} WN | { 
{IATABN1[01720{J=ES3} N JIf JES3 ABENIS, or *X DC with ABEND { 
(IATABN2|01432{3ES3{ N [If JFS3 ABEN;:S, or *X DC with ABEND ( 
| IATABN3|02Z008{JES3| N {If JZS3 ABENOS, or *k BDC wath ABEND | 
{IATAEN4S|02504{JErS3| W {If JES3 ABENDS, or *X DC with ABEND { 
{IATABN5|00752{JES34 N {If Jz2S3 ABENDS, or *K LC with ABEND { 
{IATABN6|02080]}JES3| N {If JES3 ABENDS, or *X DC with ABEND { 
[IATABN7/(01660{JES3| N {If JES3 ABENDS, or *X BC with ABZND { 
({IATABNSJO01912{JES3| N {If JES3 ABENDS, or *Z LDC with ABEND { 
J LATAEN9|02336|JES3j N {If JES3 ABENDS, or ¥*X DC with ABEND | 
{IATAEPR{O1/52|JES3] WN | { 
JIATADJP[O07360j)JES3) N |If *X JESAIL I 
[IATCNCN/01736|JES3| N | | 
JIATCNUDQ|OOB4O,JES3} N | ( 
{IATCNIC{OO816JJES3| N | ' 
JIATCNIN|OS2ZQ00{JES3} N I I 
{IATCNMR{O3Z164(JES3{ N | { 
{IATCNRM|01256)JES3| N | { 
{IATCNSL|O3088|(JES3} N {| { 
(IaTCNSV{O3Z064{JES3} N | i 
{IATCNTR(OO576{JES3} N | { 
{IATCNO3|00584|JES3}| N {Loaded if 1403/1443/3211 defined | 
(IATCN4O{02008{JES3{ N f{Loaded if 2740 defaned { 
JIATCN52|;00752}JES3j N [Loaded if 1052/3210/3215 defined | 
(ITATCN5S3|00592|JES3| N {Loaded if 1053 defined \ 
{IATCN60}00960)32S3| N {Loaded if 2260 defined | 
{IATCN66(01408{JES3| N {Loaded if 3066/5450 defined { 
}IATCH77|02264{JES3| N {Loaded if 3277 defined | 
JIATCNS4Y|00720,JES3] N [Loaded if 3264/3286/3288 defined | 
JIATCNIS|01760{JES3} N {Loaded if 2250/3060 defined I 
(IATDCDT}OO64US8|JES3] N | { 
JIATDCNC(02776,JES3| N | { 
JIATDCNDJOO664|{FJES3] N {| { 
{TATDCNO{00816(JES3| N JIf DI called in DJC mode t 
'IATDCPCJOO240/JES3} N J ! 
JIATDCUPJO3160|JES3| N | { 
{IATDIDTJO2ZB16{JES3| N IF *xX DJ { 
{IATDIIN|OSOG64(JES3| N JIf DJ called in "IN" node { 
i a a a a es ee ee ee ee ee ee ee 


Figure 4. Storage Estimates by Modu e (Part 1 of 6) 
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area ies a ee nn ee ee ee ee re he ee a ee 
{ | | | {JES3 System Generation, Initialization, { 
jbodule |Size |Loc |Fixjor Other Vaciable Considerations { 
mf pn pr ttn en rt nn a rr rn eon nntnne 
({TATCIJGE{O2912{32Z534 N JIf *X DJ 
{IATCIOL{O58z2Z4j,IZ53| N [If DJ callei in “OUT" aode 
{IATDLIN(OO80d J JES3{ {While initializinj deadline queue 
PIATLELND1|00992|JES3| {If deadline scheduling is in use 
{| ITATDLTM (01486 | JES3| {If deadline job changes status 
{IATDLWK|CO280|JzS3| {If deadline scheduling is in use 
[IATDMLK{O504e | PLPAI 
{IATIMDM{01912,PLPA\ 
{IATINTS|OOI2ZS]ELPA I 
[IATDMOT{O4Bs0] JESS} 
JIATDCMEB|O5O40|PLPAI 
| TATDMER| 05272, JES3| 
{ITATDMFR(O1880 | PLPA| 
(IATDMSE|01728jJES3| 
{IATCMIJAJOWOO(JES3] 
{IATDMNC|06048|JES3| 
[IATOMTEKIO3616]JES3| 


spool I,) error has occurred 


Lan] 
rh 


(IATDSI1, 00480] JES3| {If *X DSI 
(IATFSiI0(03616)JES3| (If *xX FSIO 

J IATFSLG{05592(JES3| [If JES3 ABENDS 
{IATFSRC{OO5S201JES3} {If JES3 ABENDS 
| LATFSTS|01016|JES3} {If *X FSTS 
[IATGRAN{03520|JES3| 

JIATGROR} 03488] JES3| 
[IATGRCDIO2520)JES3) If *X DSP 
JIATGRCP}O1416|JES3| 
{IATGRCT|03296|JES3} 
(IATGRED|00872|JES3| If *F £,DUMP=-- 


| IATGRGH|00280|JES3] 
{IATGRGS|01896)JES3} 
J IATGRGU 102512) JES3| 
| TATGRG 1] 01680) JES3} 
| LATGRHI 00164 |JES3| 
JIATGRJA | 03352] JES3| 
JIATGRIC{05072|JES3] 
| LATGRINJ 00808] JES3| 
{IATGRIE|O1464|JES3I 
| IATGRIS| 07096] JES3| 
| LATGRLD {03856 4JES3| 
| IATGRLG | 00320[JES3| 
| IATGROF 100824} JES3| 
J IATGRPR{ 01976 | JES3| 
| LATGRET| 06904 | JES3| 
J IATGRSQ}{040964231 | 
J IATGRSV]00472|JES3| 
JIATGRTX}O10244231 | 
JIATGRVT|02184}JFS3] 
J IATGRWD|01064)JES3} 
J IATGRWJ|07448|JES3| 
| TATGRWP | 01664) JES3) 
jIATGRWC 102456 | JES3] 
J IATGSC 1} 00392] JES3] 
J IATIIAMN|01080|JES3| 
JIATIICA|00920{JES3) 
JIATIICC{01608|JES3| 


If SVS TSO output or external writer request 
If MVS TSO STAT-CHCL-VALIDATE request 
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Figure 4. Storage Estimates by Module (Part 2 of 6) 
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SS ree ee cman 
{ { | ( |JES3 System seneration, Initialization, { 
{Module |Size |Loc |Fixjor Other Variable Considerations 1 

_ —+ +--+ -—--——_- -—_—_-- eer o-oo amen | 
jIATIICNjO2528,JES3; N | ! 
{IATIICT(O00544|JES3| W JO2e per CI/FI subtask | 
JIATIICX|01248|JES3| N JO2e per CI/5I subtask \ 
J IATIIDB{11088|JES3| NH |O2e for each job active in CIya#I | 
{IATIIDT|01472|JES3| N (OQne for each job active in CI/RI { 
JIATIIDY{O2Z880(JES3] N I | 
{IATIIEN|OI4S6E,JES3| N J ] 
JIATIIFD|OO2Z24,{JES3| N | | 
[IATIIIIJOWSO(PLPA| N | { 
{IATIIPR|OO95S2{JES3| N | { 
{IATIIZO|O6COS{JES3] N I { 
{IATIIP1}O44OB{JES3| N I | 
{IATIIP2|01232{JES3j N | { 
J IATIIP3(01784,JES3| N I 4 
J IATIIRC(01136(JES3| WN | { 
{IATIIRB|O2ZO56,IJES3] N ; { 
{IATIIRX|O3544|3JES3] N jOne per CI/RI subtask ] 
{IATIISB{O4NZ88|(JES3| N {One for RI, one for CI | 
{IATIISV|OIW4564JES3| N | { 
({IATIJDA{O1216{JES3( N |I£f *X IUP { 
{IATIJDRIOW32(JES3( N {If *X IJP ( 
{IATIJEN{O2520|JES3| N |If *X IJUP { 
[IATIJIN{OOS72Z{JES3| N YIf *xX ITIP { 
JIATIJST{OO616(JES3} N {If *Z IJUP { 
[IATIMDL|OOO4O{JES3] N } { 
(ITATINAL{O3776(JES3| N |JES3 initialization { 
[IATINITIO2Z360|JES3| N J JESI initialization | 
JIATINCD(O7936|JES3| N [JES3 initialization | 
{IATINCK|03520|JES3| N [JES3 initialization { 
[IATINCH[OOKI16(JES3! N {JES3 initialization ] 
{IATINC1{02304|JES3| N {JES3 initialization { 
PIATINC2{05168|JES3; N JJES3 initialization { 
[IATINDT|02260),JES3{ N {[JES3 initialization { 
JIATINGLJO76846(JES3| N {JES3I initialization { 
| IATINGN{05280|J2S3| N {JES3 initial: zation { 
JIATINIC{Q4OOS(JES3| N |JES3 initial:.zation t 
PIATINII}06936jIES3{ N |JES3 initial: zation 1 
[IATINIOJOS5S44j{JES3| N {JESZ3 initial..zation { 
{IATINITJOO79I2Z{TJES3| N |} ] 
{IATINJEB{02720|JES3|] N |JES3 initialization { 
JIATINMD|06560j{JES3| N |JES3 initialization | 
J TATINN1{07672|JES3| N |JES3 initialization | 
{IATINM2(07656,JES3| N |JES3 initialization / 
[IATINS3{03728{JES3| N {JES3 initialization t 
{IATINM4 | OZO4O]|IJES3| N |[JES3 initialization { 
{IATINPK(OOSS8|[JES3| N {JES3 initialization 
{IATINQD{O0984|JES3; N [JES3 initial.zation ! 
JIATINRN{OS424H,TJES3| N JIES3 initialization { 
{IATINRT|06592|JES3| N |JES3 initialization | 
JIATINR1(01760{JES3| N [JES3 initialization | 
{IATINR2|01536(JES3|j N JJES3 initialization ! 
(IATINSVY|(O1272{JES3| N JJESZ is itialization ' 
JIATINTK{O1V832j;IES3] N | | 
{IATIQAC{OZ680}JES3| N (If *I «. or *=2 C or *I Qg or *I B { 
{IATICBK(OO936|JES3) N {If *I o,-- ] 
toe ce a i ls a ne ce cs ae me ee a ee ee es ee ee ew en wee: eee | 
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Ce ee ee ee oe ae ee ete gn ae Part Ae ne oe te eee tee te en ee a 
| { { | {JES3 Systema Generation, Initialization, { 
{Module {Size {Loc |Fixjor Other Va iable Considerations { 
ba tnt nn then nt nn tr rn ee a | 
{IATIGCN|02736|JES3| N |Loaded for ‘I 0... consand 
{IATIQLCC{01216{JES3| {Loaded for ‘I N ... Command 

(IATICLL{O0760| JES3| {If *I L,-- 


(IATIQDS|02864|JES3| 
{IATICLV}O3I040 | IJES3 | 
[IATICDX|00960|JzES3) 


[IATIQGM102920{JES3| {If *I G,---- 

{TATIQMR (00912, JES3| | 

[IATIQOS{06192{JES3| i] 

{IATICCU| 01640) JES3] | 

{ IATIQRI[02304,JES3| | 

jIATISCR}]01224)JES3| {If *X CR 

| IATISICL{02496(JES3| {If //*MAIN DEADLINZ=-- 
| LATISDR| 008804 JES3| {If *X DR 
{IATISLS{OO920{IJES3| {If //*DATASET 

{ IATISDT|01320| JES3{ I 

j TATISLVJ02968jJES3{ 

(TATISEN|{ 04824] JES3| 

(IATISFRIO3VOG}JES3| If //*FORMIT 

J IATISIR| 00776, JES3} If internal. reader is active 


{IATISJE(03000|JzS3 | 
| IATISIL|[ 01888 |JES3| 
{| TATISLG (032401 JES3{ 


a a - - - 


{IATISMN|05976{JES3{ jIf //*MAIN 

J IATISNT|O3424,JES3| |If //*NET 

| IATIS2R{ 02280} JES3| jIf //*PROC: SS 
{IATISRD|O4096|/JES3{ ¥Y [If *X CR, ‘R, ox DR 
| IATISRI|04488|JES3} N |If *X CR, ‘R, ox DR 
| TATISRL[05486|JES3| N JI£f *X CR, 'R, or DR 
| LATISRP{02192|JES3} N |If *X CR, TR, or DR 
J IATISTR101352{JES3| JIF *Z TR 


jIATLVIN|01616]JES3} 
| TATLVLC(02200]000 | 
| LATLVVR| 03728} JES3| 
{LATMDAL|02576|JES3| 
JIATMDSK (01672, d7S3] 
J IATHDDA{O02068|JES3| 
)TATMDLR( 037444 JES3| 
PIATMDFE{O1408{JES3| 
JIATMDIC{06280{JzS3| 
| ITATNDMO{02726|JES3| 
jIATMDKS(01880|JzES3| 
| LATMDSE(09808{JzS3| 
jIATMDSL|03816[JES3] 
JIATMDVE|02416'Jz2S3| 
{LATMOCN{02184%'GE723] 
jTATMOCPIO1S546{JL53| 
}ILATMODC {01920} JES3] 
| LATMODL|01296|JzS3) 
| TATMODV| 03464) JES3 | 
| TATMODX |00968|JES3} 
{ TATMOGM|{ 03520, JES3| 
| TATMOHR{01272}J2S3} 


{loaded for *F C ... command 


{Loaded for *F N ... command 
{If *F L,-- 
{ 


(If *F G,---- 

{If *F Q,H or *F Q,8 
JIATMOMR(00736{JES3} {Loaded for *F M ... coamand 
TATMCOS{06680|JES3} | 
Ao a bh i ha ee he ee 


i 


| 
L 


te et ee oe + et ene es aoe ee. 
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| 
|Loaded when inquiry processed 


JIf *F J=---,C or *P J=---,P=~ 


|Loaded when MODIFY command processed 
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| ppc eas Qe te aR re rT ne ater ty See et rte et ae 
{ { { { IJES3 System teneration, Initialization, { 
{Module {Size {Loc |Fixfor Other Var:.able Considerations t 
bean tan ten te ton 
{[ IATMORIJ{ 02496) JES3{ 
jIATMOTR{01816 | JES3| 
{IATMOVR{O3544 ,JES3} 
{TATHSCD{02048|/JES3{ 
(IATHSCKIOO7OS;JES3} 
{IATMSDT (00112) 79253] 
[IATMSGC{01024,JES3| 
({IATMSIN|O2152|JES3| 
({TATMSIO(04968{JES3| 
{ IATMSIP|06920(JES3|{ 
{ITATMSMCJ01840(JzES3)| 
{ IATMSMI | 03576|{JES3| 
{ITATNSMN(O04272(JES3| 
| IATMSMS | 06936) JES3] 
[| IATHSHV[06032{JES3] 
| TATHSO1402056|/JES3j 
{IATMSPS | OHO4OJES3| 
{IATMSR1401128|JES3} 
J IATHSR2[01592;{JES3j 
{IATMSR3(00944;JES3| 
(IATNSTHI01712jJES3 | 
{IATMSVQ{03160(JES3{ 
[IATMSVU(02200|JES3] 
{IATNICM{ 06504, JES3j 
({ITATNIDI(032438 ,IES3} 
{IATNIDV{O0S68{IES3| 
(IATNJIC{O3600)|JES3| 
J IATNIIQ{ 01688] JES3| 
J IATNJIOD{OO0496IIJES3| 
({IATNJOP{01944,JES3}{ 
([ITATNIPD{O0304|(JES34 
| IATODMN {003201 JES3] 
(ITATODPN{004964IES3| 
{ILTODPR| 00496, JES3| 
{IATOLSI{01032|JES3} 
{IATOSDR|[07736|JES3 | 
[IATOSMN|01536)JES3j 
{LATOSMP{05112{JES3| 
[IATOSPN[O2Z464j,JESI{ 
{ TATOSPR { 03320(JES3{ 
{IATOSPS|(02320|JES3| 
{IATOSWD{O7440{JES3} 
[| IATOSWS{10520|(JES3] 
{IATPURG|02096|JES3| 
(IATRIDV{01392|JES3] 
| IATRIN1[ 03920] JES3) 
{IATRIM2(O4712(TES3} 
[| TATRIN3 103984) JES3| 
(IATRIM4 {02304 |JES3{j 
{| IATRIMS (02304|JES3{ 
(IATRISNIO1224|JES3 | 
{ IATSIBS|00336 | PLPA| 
(IATSICA;03000)PLPA 
JIATSICF|00272|PLPA| 


{IATSICN{OOS60}PLPA| 
(ys ns es Se 


a 


| 
{If *F E,-- 
{Loaded for *: V (*#VARY) command 


If *F G,---,( HK 


I 

I 

| 

| 

| 

I 

| 

| 

| 

{ 

! 

| 

I 

| 

1 

I 

| 

i 

{ 

{ 

i 

| 

I 

{If *X NJP ( 
(If *X NUP | 
{If *X NJP | 
{If *X NUP I 
*X WdP | 

(If *X NJP | 
{If *xX NJP | 
{If *X Nup { 
JIf M¥T TSO o .tput ] 
{One per active punch writer I 
}On2 per active print writer I 
{One per active writer | 
| I 
{If MVT TSO output | 
{If processing WRITER command | 
| I 
JIf print writer is active ! 
| { 
{If writer is active I 
I { 
{If purging a job from systen | 
{If *X RUP | 
{If *X RUP { 
{If *X BUP ( 
{If *X RJUP { 
|1f *X RJUP ! 
{If *X RUP i 
{if *X RJPSNPS | 
{ 

| 

{ 

i 

= 
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(cor --—— Tt - r- 


ee SEES REV epee eae eee rE 
JJES3 System Generation, Initialization, 


t ! 
{Module {Size {Loc |Fixjor Other Variabl.: Considerations 
}-----~-+--—--——-+---- +--+ _- 


JIATSICB{07296( PLPA| 
| TLATSIDOJ00272|PLPA| 
J IATSILER|OO784|PLPA{ 
{IATSIJS|08120)PLPA| 
[IATSIOP|00800|PLPA| 
{IATSIST|00720{PLPA| 
(IATSIVL|OQO440|PLPA| 
{IATSIWO|01568|PLPA| 
(IATSI34(00568|PLPA| 
[IATSSCM106720 | PLPA | 
(IATSSDI{01624|PLPA| 
(IATSSDC{O04964241 | 
[| IATSSJS|00720] JES3| 
{IATSSVT (007524241 | 
| IATUTCB|04360|JES3| 
{IATUTCCI04816)JES3| 
{TATUTCN} 02560, JES3| 
(IATUTCP {03256 | Jz2S3| 
| TATUTCT| 04384] JES3| 
(IATUTC1{01776]JFS3| 
{IATUTC2| 00664 | JES3| 
[IATUTDC]08364jJES3} 
{IATUTDD|02792|9ES3| 
{IATUTDS|07272{JES3| 
{IATUTED [00744 | JES3| 
{TATUTEE|00568{JES3| 
JIATUTPET (03592) JES3| 
[ IATUTEO{05208|JES3} 
{ LATUTER | 00288{JES3{ 
{IATUTTC(04528)JES3 | 
(IATUTTD |07656{JES3} 
{IATUTTL |03968|JES3| 
J IATUTTT|04792|JES3 | 
{IATUXO01|/00040{JES3| 
{IATUXO2| 00048) JES3| 
| IATUXO3|00040 {JES3| 
{IATUXO4 | 00032) JES3| 
{IATUX05|00032)JES3| 
| IATUXO6 {000324 JES3 | 
jIATULO7 (00032|JES3| 
{ IATUXO&| 00032) JES3| 
{IATUZO9 100032, JES3| 
{ IATUX10| 00032) Jz53] 
[ IATUX11{00032|JES3| 
J IATUX15| 00032) 3ES3| 
{IATUL 16100104 (JES3] 
J IATUX17(00108),gz53] 
{IATUX 10101736 /JES3| 
{IATUX19] 00040, JES3] 
{IATUX20 401936 | JES3} 
{IATUX21/02008;3ES3} 
{IATUX22}00040,JES3} 
{IATUX2Z3(02880|JES3| 
{IATUZ24 (00048 | JES3| 
| TATUXZ5 400160) JES3| 
[IATUX26/00040|PLPA| 


t_-..-.— — 4... 4 Le. 


A 


Figure 4. Storage Estimates by Module (Part 6 of 6) 
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(CBPRINT utility 
|iLoaded when DSP called 


{Loaded for console test request 


{Loaded when DSP called 
{Loaded when DSP «called 


I 
{If *X DC 


| Loaded 
I 

| Loaded 
{Loaded 
| Loaded 
|Loaded 
| Loaded 
|Loaded 
| Loaded 
|Loaded 
| Loaded 


when 


when 
when 
when 
when 
when 
when 
when 
when 
when 


DSP 


DSP 
DSP 
DSP 
DSP 
DSP 
DSP 
DSP 
DSP 
DSP 


called 


called 
called 
called 
called 
called 
called 
called 
called 
called 


}One per CI subtask 


Jf verify of NSL tape required 
! 
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arrester a aa eR Mam tN A a a aR a eS ree | 
|Noduie | ( { ! ] 
{Issuing} { { {JES3 System Generation, Initialization, | 
(GETMAIN|Size {Loc |Fixjor Cther Variable Considerations 1 

mn a hr hn th rr ——-———f 


[IATUXZ27{O0104)JES3] N i 
{IATUXZ8(O01044IES3| NI 
[IATUX29(00104{JES3| N | 
[IATUXIO;SOOIO4 I IJES3] N | 
JIATWAN {00256(JES3| {If AN print image translate is required 
{IATWGN |0OZ56,JES3| |If GN print image translate is required 
JIATWHN (00256{JES3| (If HN print image translate is required 
JIATWEN | 00256, JES3} |If PN print image translate is. required 
(IATWQON |00256|JES3| {If CN print image translate is required 
{TATWQONC|OG256|,JES3| {If QNC prin: imaye translate is required 
JIATWRN (00256,{JES3} {If RN frant image translate is required 
{IATWSN |00256|JES3} jIf SN print image translate 1s required 
JIATWIN 100256(JzS3} {If TN ;rint image translate is required 
{IATWXN (00256|JES3| |If XN print image translate is required 
{IATWYN |00256(JES3)| {If YN print image translate is required 

[| IATINM2{00512|JES3}| {}48(no. DEVECOLS)+12(no. dedicated devices) 
JIATINGNj00512{JES3| |16+8* (no, of DEADLINE cards) 
[IATINGN(00512|[JzS3| 18(no. 2f DEADLINE cards + 1) 
{IATINGN{OO512(JES3| }392* (no. of pre-alloc. FCT on RESCTLB) 

J IATGRAN|O0512|JES3| {16 (active JES3NEWS data sets) 

| ITATINGNO0512{(JES3| }4412* (no. NIPTERM cards) +24*(no. of NJP lines) 
{IATMGOS (005124 J=ES3} (24(active output alias names) 
{IATIIPR{[00512|JES3| |PASS/CATLG DSN reference 

{IATINGN{00512,JES3 | }184*(no. of pre-alloc. RQ on RESCTLBK) 

J IATINGN]01792|JES3| 
(IATINGN{00512|JES3| 
{ITATOSPS|00512|(JES3| 
[ IATUTCP{00512|JES3} 
{ ITATUTPO(00512|JES3| 
{IATUTTD(O0512|JES3| 
J IATINGN|}00512|JES3| 


I 

| 

I 

I 

{ 

l 

1 

I 

| 

I 

I 

| 

I 

| 

! 

{ 

I 

! 

| 

i 

| 

{ 

I 

| 

| | 
148(36 SYSOUT classes) t 
{24(no. active SET #RINT. requests) { 
[Z4(no. active SET PRINI requests) | 
[24(no. active SET FRINT requests) ( 
124(no. active SET PRINT requests) | 
[8+ (100* (no. of printers + no. of punches)) + {| 
| | | | {68*(no. of all other device cards) t 
J IATINR2|00512(JES3| N j&+(46*(no. of RJPLINE cards + no. of RJPTERA | 
| | { |cards)) | 
jIATINGN|00512{JES3| N [16*(no. of dedicated printer buffers) + 1 
i 

{ 

I 

| 

i 

! 

! 

t 

| 

1 

! 

| 

{ 

I 

{ 

{ 

| 

| 

| 

> 


o_o 


\ | | ( | (BUFSIZE)* (no. of dedicated printer buffers) 
{IATLVIN|{OSQOO|JES3| N 

{ IATLVIN|OO512|JES3{ N 
{IATLVIN;OO1T00|JES3| N 
{IATMDSE{00512{JES3| N {4K*((8+(no. of allocated data sets * (11 + 
\ | ) | Jsize of DSN)))/4K) 


{ 
{Size of LOCATE response (max. 4K) 
1 


{IATMDSB{O0512{JES3| N J4K*((104+(no. of known managed vol. * 24)) /4K) 

{IATINII {005121000 | N {Determined by nc. of PROC cards 

JIATISNT}00512{000 | N [JES3 buffer size (one ;ex each net with device 
| (fencing) 

|TATISATJON0512{000 | N {66*(no. of job retworks) 

JIATUTTD{O0512/000 | NH (16(n0. of files) 

{ IATUTTD]00512,;000 ; N jBlocksize+1 of input tape file(s) 

{| IATINC2}00512}000 | N 41044#(100(no. of CONSOLE cards) ) 

| IATINC2|00512,000 | N {160(no. buffers on CONSBUF para) 

J IATINC2}{00512{000 {| N |4&(no. of CONSOLE cards) 

J IATINII{00512}000 | BS jDetermined by no. of RESDSH cards 

[IATINII{00512;000 | BH |Determined by no. of HWSNABE cards 

JIATIICA|08192;000 | MW {Variable size; blocks of 4K each 
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Figure 5. Storage Obtained Using AGETMAIN (Part 1 of 2) 
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poceeses qt pen pepe nt ee ee 
{ 


Module | | 
{issuily| { 


JGETMAIN|Size {Loc |Pixjfor Othe: Variable Considerations 

ban en he eth rr rr pr rt rr rn nt ree 
{IATIZITE9OI79ZICOC | NW | 

PrATINIL]9005172|900 N [Levermi ed by RIPARS/CIPARM cards 

(la Tin©tyO05121)00C N jletermi..ed by no. of PRCC cards 
{IATINGE(005124)000 N |&d(n0. cf JES3 devices) 

JIATSIST{005124000 N {340+SSOB ext. (SIST,SICN,SIVL,SIOP) 


LIATRKIN1/00512/(000 
{IATRIN3 | 00512; 000 
| | | 


| | | 

| ZATGRCT}00130{000 
| LATSRCT(| 06612] 000 
| TATGRCT}00016| 000 
| LATGRG1/ 004804000 
| LATGRG 14004064000 
| TATGRSV{04096{000 
JIATABER| 040964000 
| LATSIJS [00720 | 230 
JIATSIUS} 001084 230 
| LATSISS(00512| 230 
| LATINC2(00512)231 
| TATINN3} 122881231 
JIATINCZ| 000724231 
| IATINS¥|40960[231 
| IATINMD {005124241 
| IATSIDM{00512] 241 
JIATDM2R}| 00542] 241 
{IATSIIS {005121241 
jIATSI9S(00256j 241 
}TATINN2}02048] 241 
JIATSIDM| 005124241 
JIATINYD 1005124241 
JIATINM3{53248j 241 
| TATINGN{00512}241 
}IATINN2100512)241 
JIATDOMTR 1000644241 
jIATINM.}00512424% 
| LATING 31000364245 
jIATINIO{OO512;245 
JIATINIC{005121245 
1TATINM31 005121245 
J LATINM3{005121245 
JIATINC2 (005121254 
JIATRIH1{00512] 254 


| IATLYVR{00250)4 254 
boos ee meso 


Figure 5. Storage 
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1 N 


I 
{J=S3 Sy. tem Generation, 


{o0* (started RJP lines) 


Initialization, 


{108* (no. of terminals) + 68(no. of terminal 


|readers) + (100(no. of terminal printers + no. 


jof terminal punches) 

{| IATXSND 

J ITATXRCV 

|ATIME 

| TATXGFX 

(| ITATXGRQ 

{as needed for ASAVE areas 
| 


{One per JSEL,JTERM,JREQ,EOT,EOMN,RQUJBID 


{One per active INIT, 
(108*2(t otal memories) 


{8+ (4(no. of CONSCLE cards) ) 
(4K (3(total TRK+FMT cards) ) 


1 
| 
{4+10 (nc. 


LOGON, 


or MOUNT 


SETNAME cards) +10(no. names) 


{784 (ALLIC DD) +(1764+USRPG) * {OPEN UNAL) 
{72(total files with I/O error) 


{528* (to:al memories) 


{One per active INIT, LOGON, or MOUNT 


}2K (no. of MAINPROC cards) 


{56(total open unallocated spinoff data sets) 
}28(no. mains per each device) 


{50K or STXINT on MAINPROC 
132 (no. 


of DEVICE cards) +12 


148*(3* (no. of MAINPROC cards-~1)) 
{If spool IyO error recovery is active 


| 108*3 (n>. 


of MAINPROC cards-1) 


| 
{264+ (2410. of S200L)+(48 (no. TRK+FMT) 


$216 (2(total TRK+FMT cards) ) 


{44(tota. protected buffers,2) 


{44 (tota 
1136(no. of JES3 devices) 


protected buffers/2) 


j80* (no. of started RJP lines) 


cee er it ere ee ee cm ee tape ae ene a enrenne aS aS ee aE ae 
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YES3 STORAGE ESTIMATE SUNBABY 


Basic CSECT Requirement 452k 
Dynamic CSECT Requirement 331k 
PLPA CSECT Requirement 47k 
Basic Subpeol 000 43k 
Basic Subpeol 230 1k 
Basic Subpool 231 52k 
Basic Subfool 241 58k 
Basic Subpool 245 2k 
Basic Subfool 254 1k 
JES3 AUXILIARY STORAGE RECUIREMENTS (BFQUIRED) 


The following describes the auxiliary space necessary to contain the JES3 
system. SYS1.JESPACE is used as a spool volume to store all job input, 
job output, JES3 control blocks, and system data such as the job journal. 
SYS1.JES3CKPT is used for Checkpoint,sRestart. 


//SPOCL1 (CD DSN=SYS1.JESPACE,DISP=OLD 
(Dynamic as large as you want it, but must be contiguous) 


//CHKPNT [CD DSN=SYS1.Jd£S3CKPT, DISP=OLD 
(Only one cylinder SYSDA required) 


The following describes the library concatenations reguired for MYT and or 
SVS main processors. SYS1.JES3RI contains the Reader/Interpreter modules 
which are shown below. SYS1.dJES3LIB contains all of the JES3 code excert 
the subsystem interface modules that reside in SY¥YS1.LPALIB and is 
described in more detail in “DATASET Macro Instruction" and "Systea 
Generation Macro Instructions", 


//TATRILB CL CSN=SYS1.JES3RI, DISP=SHR 
(Load acdule library for RI aodules) 


// CD DSN=SY¥S1,JES3LIE,DISP=OLD 


34 JES3 Release Guide (VS2 Release 2 


ITATRIL2 CONTENTS 


The fcllowing table describes the two libraries that may te defined in the 
JES3 procedure with tne ddname of IATRILB. One of these libraries must be 
defined if you will be running either MVT or SVS aain frocessors, or 

both. The SVS library must be used if any of the main processcrs ale 
running SVS. If these libraries are used, they must fe authorized. 


MVT READER/INTERFRETER NCDULES 


BCDULE NASE DECIMAL SIZE ALIAS FCR COMMENT 
IEFHRFK2 * IEFMVTHR MVT CNLY 
TEFMVIHM 45 36 MVT ONLY 
ITEFMVTHR 1224 “VT CNLY 
TEFMVTJA 6192 MVT ONLY 
IEFVGM1-19 5016 

IZFVGM70-71 460 

IEFVG#78 248 

IEFVHA 34688 

IEFVECB = IEFVHA 

IEFVHF = IEFVHA 

IEFVHM = IEFMVTHM MVT CNLY 
IEFVHN 1600 

IEFVHREP - IEFVHA BVT CNLY 
IEFVH1 5160 

IEFVINA 6040 

IEFVJA = LEFMVTJA MVT ONLY 
IEZDCODE 208 NVT CNLY 


SVS READER/INTiRERETER MCDULES 


KODULE NAME DECIMAL SIZE aLIiS FOR COMMENT 
IEFVAMP 80 SVS ONLY 
IEFVDMSI 5120 SVS ONLY 
IEFVGK 7 IEFVHA SVS CNLY 
ITEFVGM1-19 5016 

IEFVGM70-71 480 

IEFVG478 248 

IEFVHA 34688 

IEFVHCB = IEFVEA 

IEFVHF = IEFVHA 

IEFVHN 1600 

IEFVH1 5160 

IEFVINA 6040 


If running S¥S main processor, the following 
Changes must be applied using the AMASPZAP service aid prograr: 


NANE IEFVHA IEFVFA 

VER 03F0 BFF7FIU4C,4780B41E 
REP 03F0 4700F 14D, 47FOB41E 
NAHE IEFVH1 

VER 0194 4720B0FC 

REP 0194 4700 
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SYSTES BANAGESENT FACILITIES INFORMATION 


Systes Management Facilities (SMF) is a feature of OS/VS that provides 
the means for gathering and recording information that can be used for 
evaluating system usaye. Information is collected by SMF data 
collection routines and user-written wxit routines. 


The JES3 SMF tecords presented in this: chapter is in addition to SMF 


information found in OS/Y¥S System Man: gement Facilities (SHF), 
6C35-0004, 
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RECORD TYFE 6 ~- OUTEUT WRITER 


Record type 6 is written for each data set processed by JES3 output 
service. A record is written for 2ach copy with a given form name. The 
record length is 100 bytes. The format is shown in Figure 6. 


Bit Meaning When Set 
0-4 Roserved 


ee ne ee gee ee ETE Te eT RE eee ee ee ee eS, 
{ Displacement j Field | Data ! | 
| Dec Hex | Size j| Format | Contents | 
| ----- $$ +- -——--—_--—---- { 
| Oo | 0 { 1 | binary | Systesa indicator | 
\ | | | Bit Seaning When Set ! 
I I | I | 6 VS2 ( 
{ 1 | 1 | 1 {| binary | Becord type | 
| 2 | 2 { 4 {| binary | Time, in hundredths of a second, | 
{ i] | ! {| reccrd was moved to SMF buffer | 
| 6 | 6 | 4 | packed | Late record was moved to SMF | 
| | | { {| buffer, in the form OOYYCDDDF, | 
| ! | | { where F is the sign | 
{ 10 | A { 4 {| EBCDIC | Systen identification | 
{ m4 | E | 8 | EBCDIC {| Job name | 
{ 22 | 16 I 4 | binary | Time, in hundredths of a second, that | 
| { { { { the reader recognized the JCE card ! 
| l | | { for this job. ] 
| 26 | tA | 4 | packed | Date that the reader recognized the ! 
I I | I {| JCB card for this job, in the fora { 
| | | { { QOOYYDDDF | 
{ 30 | 12 { 8 | EBCDIC | User-identification field from common | 
| | | | {| exit parameter area I 
{ 38 | 26 | 1 | EBCDIC { Cutput WIR Class (blank if non-SyYSOUT) | 
1 39 | 27 ] 4 { binary | Output WIR start time | 
{ 43 [| 2B { 4 | Facked (| cCutput WTR start date | 
1 47 | 2F | 4 { binary | Number of records written by the | 
! | | I { writer, by form number and Ly class, | 
| | | | | includes repeats and restarts | 
{ 51 | 33 | 1 | binary | IycC status indicator ( 
I | | { ( | 
l | | { | { 
| | | | | 5 Data input error t 
| | { | | 6 Reserved ] 
{ ( | | { 7 Control block input error { 


Ce es ee 


Figure 6 (Part 1 of 2). Record Tyre 6 
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rr ee ee eae ee a ee eae Ty OR ee ee ee ye ee NE SE pee ong 

{ CLisplacement | Field |{ Data { { 

| Dec Hex | Size | Format | Contents | 

a fa a fan ref am rrr ener ee nme | 
34 { 1 | birary {| Total number of data sets processed | 

| by Output WIR and included in this 

{ xrecord. (Count for each time 

| a data set is printed.) Does not 

| anclude restarts. 

{ 

{ 

1 


|--—— 


52 


Form number 
Reserved 
Subsystem generating ID 


53 
57 
58 


35 
39 
3A 


EEBCDIC 
binary 
binary 


_ 


EXT-WTR 
2 JES2 
5 JES3 
Length of this section, including 
this field 
Lata set control indicators 
Bit Meaning When Set 
0 Reserved 
1 Record represents spun off 
data sets 
2 Operator terminated this data 
group 
3 Operator interrupted this 
4 


60 3c binary 


62 3E binary 


| 

| 

I 

| 

| 

{ 

| 

{ 
I l 
| | 
\ { 
| | 
I l 
{ ! 
| { 
( | 
| I 
l { 
{ { 
I I 
| I 
{ data group ( 
H Operator restarted this data | 
I group | 
] 5 Record represents continuation | 
{ of interrupted data group | 
| 6 Operator overrode programmed | 
\ printer carriage control | 
| 7 Punch output was interpreted ( 
{ 8-15 Reserved i 
| JES assigned job number | 
{ JES logical output device name | 
{ FCB identifier I 
{ UCS identifier | 
| Approximate page count. (Skip tc { 
{ carriage control channel one | 
{ counted as a page.) For punch data | 
J sets, the nuaber of cards punched. ] 
| Data format error indicators | 
{ Bit Meaning When Set I 
| I 
| I 
| | 
! I 
I ! 
{ I 


64 
68 
76 
80 
84 


4Q 
a) 
4c 
50 
54 


EBCDIC 
EBCDIC 
EBCDIC 
EBCDIC 
binary 


fS&eeost 


88 58 binary 
0-5 Reserved 
6 Some first character control 
data bad, default used 
8-15 Reserved 
Cutput priority 
Logical Output device group nage 


binary 


| 
| 
| 
| 
| 
| 
{ 
| 
{ 
| 
| 
{ 
| 
I 
| 
I 
| 
| 
| 
I 
1 
| 
| 
| 
| 
| 
| 
l 
{ 
| 
| 
I 
I 
| 
{ 
| 
l 
I 
| 
| 
\ 
1 
\ 
| 
( 
{ 
| EBCOIC 


em eee a cee ce ee ee ee eee ee ee ee ee ee eee ee ee ee ee ee 


Figure 6 (Part 2 of 2). Record Type 6 
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RECORD TYPE 25 - JOB ALLCCATIONS 


Record type 25 is written for each job processed hy the aain device 
scheduler. A record is written for each static or dynazic allocation 
and for each group of frivate cataloy allocation requests. The record 
length is 38 LEytes, slus the length of the descriptor section. The 
forgat is shown in Fijure 7. 


rn rn a a rer” 


{ Displacement | Field | Data 


{ ' 
{| Dec Hex { Size | Format { Contents { 
|---------~-— —+-—----— nnn re rer rr tra seee I 
! Oo | 0 | 1 | binary {| System indicator t 
\ \ | \ | Bat Meaning When Set | 
| | | | I 6 vs2 | 
t 1 4 1 \ 1 | binary {| Record type | 
i 2 {| 2 ! 4 | binary | Time, in hundredths of a second, | 
| \ | | record was moved to SMF buffer 1 
| 6 | 6 I 4 j packed { Date record was moved to SMF buffer, | 
{ | | | { an the form OOYYDDDF, where F as the | 
! l t I | sign | 
{ 10 | A { 4 | FBCDIC | System identificaticna i 
en | rs | 8 { EBCDIC | Job name { 
| 22 | 16 | 4 { binary | Time, in hundredths of a second, that | 
| { | | | the reader recognized the JOB card | 
{ | | | for this jok { 
(| 26 | 1A { 4 | packed | Date that the reader recognized the | 
{ { | | ( JOE card for this job, in the | 
{ ! j | {| form OOYYDIDF | 
1 30 | TE | 8 | EBCDIC | User-identification field { 
Soo So a ee a 


Figure 7 (Part 1 of 2). Record Tyre 25 
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Descriptor Section 


ee: 


---—— eee 
Displacement | Field | Data 


{ 

{ Dec Hex | Size j Format 
| 

\ Oo 4} 0 | 2 {| binary 
! I I ! 

| { { l 

| { | | 

| | { { 

| | | | 

| { ( { 

I I | \ 

| { { | 

{ 2 | 2 { 4 | binary 
| 6 | 6 { 4 | binary 
{ 10 | A { 4 | binary 
( | { | 

{| 1m | E H 4 { packed 
{ { | | 

} 18 | 12 I 4 { binary 
| ! | | 

| 22 {| 16 | 4 | packed 
! ! { I 

{( 26 | =A { 4 { binary 
{| 30 4 +E | 4 { binary 
| 34 ff 22 | 4 | binary 
| | { | 

| { | | 

{ 38 | 26 | 4 | packed 
( { | I 

| \ { | 

{ 42 | 2A | 4 | binary 
{ 46 | 2E | 4 {| packed 
| pe eee 
Figure 7 (Part 2 of 2). Record 


oa == ft 


SE SE RR CS AF EY SP OO 


J 


| Contents 


{ Functiow Flags 

Bit Beaning 

0 - dynamic allocation 

- static JCL allocation 
- cataloy allocation 
- execution allocation 
- automatic allocation 
- manual allocation 
Reserved 


1 
2 


| 

{ 

| 

{ 

I 

{ 

\ 

{ 3-15 

| Number of tape voluses fetched 

{ Number of disk volumes fetched 

| Time of day, in hundredths of a 

{ second, fetch processing started 
| Date, in the form OOYYDIDF, where F 
| ais the sign, fetch processiny started 
{ Time *S S command issued 

{ (zero if automatic allocation) 

{| Date *S S command issued 

{ (zero if automatic allocation) 

| Number of tape volumes nounted 

| Number of disk volumes mounted 

{| Time of first volume nount message 
{ (time of JES3 allocation if no 

{ mounts) 

{| Cate of first volume mount sessage 
{ (time of JES3 allocation if no 

{ mounts) 

{ Time of JES3 device verification 

{ Cate of JES3 device verification 


a cere ees ee ee ee ee ee ee ee ee ee ee ee ee oe ee ee 


Type 25 
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RECORD TYPE 26 - JOB £URGE 


Record type 26 is written at jcob purge after all SY5CUT for the job has 


been processed. 


The length is 50 rFytes, plus the lenjth of the 


descriptor, events, and actuals sections The ainizug length is 232 


bytes. 


The jeb is identified by job log number, proyrammer's name, and JES job 


number. 


Cperating information includes the start and stop time fcr 


processing of the job by the reader, execution and SYSOUT output phases, 
JES logical input device name and output statistics. The format is 


shown in Figure &. 


Ce SS 8 8 a a a a Se en enn wr wn aren ee oF eS SO SR SE i | 
| Displacement | Field | Data { | 
{ Dec Hex | Size | Format | Contents { 
| em tn nth tr nn Fr nn fen en tr rr rn tern rane | 
\ 0 | 0 ( 2 | binary | Recoré length { 
| 2 | 2 | 2 { binary | Segment discriptor | 
| q | 4 | 1 { binary | System andicator { 
| | | i { Bit Meaping When Set | 
| | | ! ! 6 vS2 | 
{ 5 | 5 { 1 { binary {| Record type | 
\ 6 | 6 | 4 {| binary | Time, in hundredths of a second, | 
{ { I { { recori was moved to SMF buffer { 
{ 10 | 10 | 4 {| packed | Date r:cord was moved to SMF buffer, | 
| ! | | { ain th: form OOYYCDDLDF, where F is the | 
| { | | {| sign l 
i m4 | A | 4 { EBCDIC | System identification { 
| 18 «| E | 8 { EBCDIC | Job naze | 
{| 26 | 16 | 4 { binary | Time, in hundredths of a second, that | 
| I I I { the reader recognized the JCB card { 
| I | { ( for this job { 
{ 30 4| 1A { 4 | packed | Date that the reader recoynized the | 
| | ! | | JCB card for this job, in the | 
| | \ I | form QOYYDDDF { 
{ 34 | 1E | 8 { EBCDIC | User-identification field \ 
| 42 | 26 | | 4 | binary { Reserved { 
( 46 | 2B \ 2 {| binary | Subsystem identification | 
1 | ! | |! Yalye Meaning 1 
I | ( I I 2 JES2 I 
{ { I I I 5 JES3 { 
f 48 | 2c { 2 { binary { Section indicator { 
| \ \ l | Bit Meaning When Set | 
| | ! I | 0 Descriptor section present | 
I I { I I 1 Events secticn present { 
| | { I { 2 Actuals section present { 
{ I { t {1 3-15 Reserved t 
a a a i ee a a wh ee So eee er a a Se el eed 
Figure 8 (Part 1 of 3). Record Tyre 26 
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Descriptor Section 


eee ret ee ar ee ee Fe re Sard aE Se ee nt ie Ee Ee akan ream reste | 
{| Displacement | Field | Data | | 
t Dec Hex {| Size | Format { Contents { 
|------—--—---+--- +t --—_-- + OOO I 
| Oo |} | 2 | binary | Length of descriptor section, | 
| | | | { including this field { 
| 2 | ! 2 { binary | Reserved | 
{ a | | 1 | binary | Job information t 
| ! i t { Eit Meaning When Set \ 
I | { ! { 0 DJC job { 
lt { { | | 1 Deadlined job | 
| { | j { 2 Job met deadline f 
| i { { | 3 Process job i 
{ t | { { 4 Job left system via NJP { 
| { { I | 5 Job entered system via NJP | 
t ( { | | 6 Job was dumped via DJ t 
| | | { | 7 Job was entered via DJ I 
| 5 | | 1 { binary | Jcb information { 
| | | \ i £it Meaning When Set | 
| Hi | 1 t 0 Priority from priority on | 
| | ] | | JOB cara | 
| | 1 | i 1 SETUP job | 
| | l | | 2 Job held via TYPRUN=KHCLD | 
| | | | { 3-4 Reserved { 
! | | i { 5 Job entered via internal | 
| | | | { 6 Job was rerun on sain reader | 
| | { { | 7 Job was canceled by the | 
I { { { { operator { 
{ 6 | { 4 { EBCDIC | JES3 assign:d job number { 
{1 10 4 i 8 | | Job ID - NNIN is job number | 
{ { \ i \ ID Meaning i 
| { { { { JCBONNNN Normal job 1 
{ { { { { STCONNNN Started task control { 
| { | | | TSUONNNN TSC user | 
[ 18 | {| 20 { EBCDIC | Programmer's name from JOB card { 
{ 38 | | 1 { EBCDIC { MSGCLASS from JCB card | 
{ 39 | | 1 { EBCDIC | Job class from JOB card | 
{ 40 | { 1 | binary | Initia! job priority i 
{ 41 | | 1 { binary | Job se’ ection priority | 
{ 42 | i] 4 | binary | Beserved { 
| 46 | | 8 { EBCDIC j Input cevice ddname 
{ { { { { User IL if TSO submit { 
I { { { | System name if NJP { 
t S4 | { 8 { binary {| Reserved | 
1 62 | | 4 { kinary | Estimated execution time { 
| 66 | { 4 {| binary | Estimated output lines | 
1 70 | | 4 { binary | Estimated output cards | 
1 74 | | 1 {| EBCDIC | Deadline schedule type | 
1 75 | | 3 | binary | Reserve: { 
1 76 | { 8 | EBCDIC {| Input d:vice group name ( 
| 86 | 1 8 { £BCDIC | Procedu:e DD name { 
| 94 | | 8 | EBCDIC | System job sent to via NJP | 
| 102 4 | 8 {| EBCDIC {| System job received from via NJF ! 
1110 4 t 8 | EBCDIC | IL of d:pendent job net to which | 
1 { \ | | job belongs (//*NET) | 
{ 118 | { 4 | binary | Deadline schedule time | 
j 122 | { 4 { binary | CLeadline schedule date | 
{ 126 | | 8 { EBCDIC | Job class name | 
eae BS ei ee a a es Sl i ey 


Figure 8 (Part 2 of 3). jiecord Type 26 
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Events Section 


en ee ed Toe ER eS ET ee ER ee ENE Se eT ET OPER Ey ay RO RE SO RET OTe we ag ong SFE eee en ee ee ee be) 
{ Cisplacement | Field | Cata \ | 
{ Dec Hex | Size {| Format {| Contents | 
| nn a fa nth rr pn nn rn rr rr —~—| 
| Oo | { 2 | binary | Length of events section, including { 
| { ( { { this field { 
| 2 | | 2 { binary | Beserved | 
! 4 | | 4 { Einary | Reader stop time { 
i 6 | i 4 | packed | Reader stop date | 
{ 12 | | 4 {| binary | Converter start tiae | 
{ 16 | \ 4 {| packed | Converter start date { 
1 20 | | 4G | binary | Converter stop time { 
i 24 | | 4 {| packed | Converter stop date | 
1 28 | ( 4 | -inary | Execution start tine { 
i 32 | ! 4 {| gacked | Execution start date { 
| 36 | | 4 {| binary | Execution stop tise | 
1 40 4 | 4 | Facked | Execution stof date i 
1 4a | | 4 | -inary {| Cutput processor start tine { 
1 48 4 | 4 | Facked | Cutzput processor start date | 
{f 52 | | uy { -inary | Cutput processor stof tize | 
1} 56 | { 4 | Facked | Cutpfut processor stop date | 
bere wee eee ee ee Se eo ee ne eee Se ee Se ee J 
Actuals Section 

ee ee ee ee eS gee Tad PN eee eee Se PO Pig = ee ee wee ee eee OD 
{ Oo | ( 2 | binary | Length of actuals section, including {| 
| I I | { this field | 
| 2 | | 2 | binary | Reserved I 
{ | I 4 | binary | Number of input cards for job { 
| { | l } (JCL and data) | 
| 8 | | 4 i binary | Output lines to sfocl I 
1. 172 4 | 4 } binary | Cutput cards to spool { 
| 16 | | 4 | EECDIC | Input processor system ID | 
| 20 | i] 4 | EBCDIC | JCL conversion processor system ID ] 
1 24 | | 4 {| EBCDIC | Execution processcr system ID | 
| 26 | | 4 | EBCDIC | Cutput processor systea IZ | 
| 32 | | 8 | EBCDIC | Failed step nase { 
{ 40o0 | { 8 {| EBCLIC | Failed ;roc naze t 
| 48 | \ 4 { binary | Condition Code { 


Figure 8 (Part 3 of 3). 
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RECORD TYPE 43 - SUBSYSTEM START 


Record type 43 contains JES3 information at the time JES3 is started. 
The record is written during JES3 initialization. The record length is 
38 bytes, The format is shown in Figure 9. 


 caeas er agnreaSeTLPET: - rises er eae cena | 
{ Displacement | Field | Data { | 
{ Dec Hex | Size | Format | Contents j 
|------———-----—- +------- t-=--=- nn rr rn rrr | 
| oO | 0 | 1 {| binary | Syste: indicator | 
I 1 I \ | Bit Meaning When Set \ 
I I { I { 6 vS2 I 
{ 1 | 1 I 1 { binary | Becor:. type I 
j 2 | 2 ! 4 | binary | Time, in hundredths of a second, | 
| { | | | reco :d was moved to S&F buffer { 
{ 6 | 6 { 4 | packed | Date -ecord was aoved to SMF buffer, | 
| | | I {| in tke form OOYYDILF, where F is t 
1 { | { { the sign I 
1 10 1 A { 4 {| EBCDIC | System identification 1 
1! wm 4 E { 2 | binary | Subsystem identification | 
| | i ( 1 x¥'0005' signifies JES3 { 
1 16 4 {| 10 | 2 | binary | Reserved { 
1! 1 | 12 ] 2 | binary | Reserved { 
t 20 | 174 ! 2 { binary | Reserved | 
{ 22 | 16 | 1 { binary |{ Start record flags | 
| | | | | Bit Meaning When Set 1 
| | | | { 0 Cold start { 
| t ! | i 1 Warm start | 
| j | | { 2 Hot start 1 
! ! | | | 3 Queue analysis required | 
t | { | 4 Global syster | 
I I | | 1 5 Local systen | 
| | | { { 6 Reserved | 
I { | | | 7 Dynamic Systep Interchange { 
{ 23 {| 17 | 1 {| binary | Reserved | 
{( 24 | 18 | 1 | binary | Reserved | 
4 25 | #19 | 1 { EBCDIC | Initialization deck origin type | 
1 26 f[{ A | 8 { FBCLCIC {| Initialization deck origin | 
| { | | | Type Origin contents | 
| | | i { | Member name (JCL default) | 
{ | i ( ( M Member name (CP choice) { 
| | | | | U Unit address (OP choice) { 
{ 34 | 22 t 4 { EBCD:C { J#S3 procedure bape | 
nn te ce we ce a rece a cee eee ce ce ee a ee ee acre nn nn a ee em in ae ae ae a ce ee a a ee a ne a a ee a me ee a | 


Figure 9. Record Tyfe 43 
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RECORD TYPE 4S - SUASYSTZEM STOP 


Record type 45 contains JzS3 informgaticn at the time JES3 is stopped. 
The record is written during JES3 terpination. The record length is 26 
bytes. The format is shown in Fiyure 10. 


es: a Sell ee a EP ST ED CD AS AS A SS AS ed ES SPS SS a Goat ih Se cee a GD aa en a eh Se a ces ee een ae OS Ss Sn sa oes Qe ee ae a eres ery 

Cisplacement | Field | Data I I 

Dec Hex | Size | Format | Contents | 

Sa a el ae ae ea ee eee ean eS eae eee | 
0 binary {| System indicator 


o | 
| Fit Seaping When Set 
6 VS2 


| 
( 
I 
| I ( | 
| | | | | 
I I | I | I 
| 1 | 1 ( 1 |} binary | Record type I 
! 2 | 2 | 4 { binary | Time, in hundredths of a second, f 
| | { { record was moved to SMF buffer | 
| 6 | 6 { 4 | packed | Date record was moved to SMF buffer, | 
| | I | | an the form OOYYDDDF, where F is | 
{ l I \ | the sign | 
{ 10 | A { 4 | EBCDIC | System identificatacn | 
ee | E | 2 { Dinary | Subsystem identification { 
| | ( | { %x'0C05* signifies JES3 | 
{ 16 {| 10 { 2 {| binary | Reserved \ 
{ 118 | 12 { 2 { binary | Reserved t 
| 20 {| #14 { 1 | { Stop record flags l 
| \ \ i | Bit Meaning When Set \ 
| { { i i ¢ Subsystem ended due i 
! { | I I to abend { 
| | { j | 1 DSI has been invoked i 
f 27 | 15 ( 3 { binary { Completion Code (S¥S,/USER) | 
i 24 |{ 18 ( 1 t { Beserved { 
! 25 | #19 | 1 | | Initialization deck origin type | 
| 


Figure 10. Record Tyre 45 
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RECORD TYPE 47 - SIGNCN/START LINE 


Record type 47 (V¥S2 only) is written by JES3 RJP under two conditions: 
(1) when a RJP line is started, and (Z) when a remote user signs on. The 
length is 22 bytes, plus the length of the identification and message 
sections. 


This record contains the recori type, time stamp (time and date), CPU 
identification, JES3 subsystem event, remote name, line name, password, 
and message text. The format is shown in Figure 11. 


------——--——- 


{ Displacement | Field | Data ! { 


a a re ne ne ee ee meng 


{| Dec Hex | Size | Format { Contents { 
then nn +————- —+ ---——- -—-- OO | 
0 0 1 binary | System indicator 


let 


| Bit Beaning When Se 
6 vVS2 


{ + 

{ { I I I 
! I I { I 
I | I I | 
! 1 | 1 { 1 {| Einary | Record type { 
i 2s 2 | 4 | binary { Time, in hundredths of a second, { 
{ { | { {| record was moved to SMF buffer { 
t 6 | 6 | 4 | packed { Date record was moved to SMF buffer, | 
| { | | { in the form OOYYDICT£, where F is | 
{ | \ { { the sign ] 
1 10 | A { 4 | EBCDIC | Syste: identification | 
{ 1m | E } 2 binary | Subsy:item identification j 
| i | i { X'00)5" signifies JES3 t 
{ 16 | 10 I 2 | binary { Reserzed | 
| 178 4 12 | 2 | binary | Lengta of remainder of record, not | 
| ( | | { including this field t 
1 20 4 #184 { 2 { binary { JES3 SIGNON/Start Line suksysten | 
! | { | | event - X'C001" signifies SIGNON | 
H ! t | | X¥*0002' signifies Start Line | 
| Fa ne ce ee ea a ee ws a cl ce a a ce at es ie a Ste Se ee ae as See eed 


Identification Section 
(ewer nr a 7 


{ 0 4} | 2 { binary | Length of identification section, { 
i { H { | aincluding this field { 
I 2 | ] 8 | EBCDIC | Remote name | 
{ 10 | | 8 | EBCDIC | Line name | 
(18 | { 8 {| EBCDIC | Fassword { 
a a ewe a ar een cr ere nee oe re ee ee ee re ee ae we as re me ae a ae a ae ne ee ee ee ee wy 


Message Section (will not appear if this is the start of a line record) 


(won - ~ - - - - + - nae 
Oo | 2 binary Length of SIGNON message section, 
includin,; this field 


record, informaticn from colugns 35 
through 70 of the SIGNON card image 


! 
I 
| 2 
| 
! 
! is placed in this field.) 


{ \ 
{ I 
| 36 EBCDIC | Message text. (If this is a SIGNOW 
I | 
| | 
! { 


ee | 


e 
t 
{ 
| 
| 
| 
| 
| 
| 
| 
' 
| 
| 
' 
| 
| 
! 
' 
' 
{ 
! 
1 
| 
| 
| 
| 
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! 
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Figure 11. Record Type 47 
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RECORD TYFE 46 - SIGNCFF/STOr LINE 


Record type 48 (V¥VS2 only) is written by JES3 when a RJF line terainates 
or when a remote user signs cff. The length is 7¢$ bytes. 


This record contains the record type, time stamp (time and date), CPU 
identification, JES3 subsystem event, remote nane, line name, password, 
and summary of data and error activity. The format is shown in Figure 
12. 


De a ee es eee ee oe ee ey Pe et ge Te Se EE ee ee See ae ee ee aE RT eee Seat Pete ee eee oe ae | 
| Displacement | Field | Data | | 
{ Dec Hex | Size | Formit | Contents { 
| ---- +------- t----= --- nn re nn \ 
| Oo | 0 ( 1 { binacy | System indicator I 
| | | | | Bit Beaning When Set | 
| I ( { | 6 VS2 \ 
| 1 | 1 | 1 { bkinacy | Record type 1 
| 2 | 2 | 4 | banacy | Time, in hundredths of a second, | 
{ ( | | { record was moved to SMF huffer | 
| 6 | 6 1 4 | pack2d | Late record was moved to SMF buffer, | 
{ ( ( \ { ain the form OOYYDLLF, where F is the | 
I ! | | | sign I 
{ 10 | A { 4 | EEBCDIC | System identification | 
| 1m | E | 2 { binacy | Subsystem identification | 
| i | { i x'0005' signifies JiS3 { 
{ 16 | 10 | 2 {| binary | Reserved | 
{| 118 ¢{ 12 | 2 | binary { Length of remainder of record, not | 
t | | | { including this field | 
| 20 | 14 ! 2 { binary | JES3 SIGNOFF/CANCEL Line subsysten | 
{ | | | | event - X'CC0O1* signifies SIGNCFF { 
! ] | ] | X'0002* signifies CANCEL Lane] 
}! 22 | 16 | 2 (| binary | Reserved { 
{| 24 | 18 | 8 { EBCDIC | Remote name | 
{ 32 {| 20 | 8 | EBCIrIc | Line name | 
1 4&0 | 28 | 8 | EBCLDIC { Password { 
| 48 | 30 | 4 { binary | Number of EXCP's | 
|} 52 | 34 | 4 { binary | Number of Line errors | 
| 56 | 38 { 2 ! binary | Number of time outs to read text | 
{ 58 | 3A { 2 : binary | NAKS received { 
{ 60 |{ 3c | 1 i binary | Command rejects \ 
{ 61 | 3D | 1 | binary | Intervention reguired { 
{ 62 | 3 | 1 | binary | Bus out checks | 
1 63 | 3F | 1 {| binary | Equipment checks | 
1 64 |{ 4&0 { 1 | binary | Data checks | 
{ 65 | 41 ! 1 { binary | Lata overruns t 
1 66 {| 42 | 1 } binary | Lost data | 
{| 67 ¢{ 43 | 9 {| binary | Reserved | 
{ 75 ¢ 4c { 3 { EBCDIC | Line adapter address of UCB 1 
Qu. 


Se ee | 


Figure 12. Record Type 48 
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RECORD TYFE 49 ~ JES3 INTEGRITY 


Record type 49 is a duplicate of record type 47 except the password may 
not be valid, and the event type aay be one of four codes. This record 
is written when an invalid SIGNCN is attempted. The lenyth is 22 bytes, 
plus the length of the identification and messige section. 


This record contains the record ty:e, tine staup (time and date), CPU 
identification, JES3 subsystem event, renote name, line nare, password 
(invalid), and message text. The format is shown in Figure 13. 


ee A A RE SY ER ES SR Se ED NY SE 


| Displacement | Field | Data { 


1 


| 
{ Dec Hex | Size | Format | Conterts { 
|------——------t---——--- qe at eee enema | 
{ 0 | 0 | 1 {| tinary | Systex indicator | 
| | | \ | Bit $Meanjng When Set { 
| I I { { 6 ¥S2 | 
{ 1 | 1 4 1 { binary | lecorc type { 
| 2 | 2 | 4 { binary { lime, in hundredths of a second, { 
| ( | | { xvecord was soved to SMF buffer { 
] 6 | 6 | 4 | packed | Date record was moved to SMF buffer, {| 
| ( { { { ain the form OOYYCLLF, where F is the | 
| { 1 | | sign | 
1 10 f{ A { 4 { EBCDIC | System identification | 
{ mam | E { 2 | binary | Subsystem identification { 
{ { { { } x¥*'0005' signifies JES3 t 
1 16 4 10 \ 2 { binary | Reserved { 
{ 18 | 12 | 2 | binary | Lengt! of remainder of record, not i 
{ | H | | aincluding this field ! 
| 20 4 #14 | 2 { binary | JES3 SIGNON invalid subsystem event { 
| | \ { {| Value Meaning | 
| { { | | 1 Terminal not defined | 
| | | | | 2 Invalid password | 
{ | ! | | 3 Line already signed on ( 
j | I I { 4 Terminal already signed on | 
i rn we a nn an a a me me ere ee ere en ee ee ee ee ae ae eee eee ell 
Identification Secticn 
oe ese he a oe BS ee See eee, + 
H Oo | | 2 {| binary { length of identification section, I 
\ | I | { aincluding this field { 
{ 2 | { 8 | EBCDIC | ‘IGNON terminal name | 
tf 10 | | 8 { EBCDiC | line name { 
| 18 | { 8 { FBCDIC | SIGNON passworc ! 
nn re a a ee te ee ee re ae ee ce eT Ee ae ae eee ee on men ne mene 
Message Section 
Se ee ee ae a TE Fae ee a Eg ey ee get eg eS ee ae 
Oo | 2 } binary | Length of SIGNCN message section, | 
including this field \ 
2 EBCDIC Message text. (Information from column| 


| 

| 

{ 35 through 70 of the SIGNON card 

| image is placed in this field.) { 
a es ne ee me wa a a a a an ae ee a rn wa i tee a ene es me ne mn ce ee wre ee cre an cn wee ee ee mee i ne ae a ne nt te a ne eee ce ll 


Fiyure 13. S&ecord Type 49 
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CheckpointyRestart is a technique for recording information akout a job 
at frogramzer-designated checkpoints so that, if necessary, the jcb can 
be restarted at one of these checkgoints or at the beginning of a job 
step. 


The checkpointyrestart inforaation for JES3 presented in this chapter is 
in addition to checkpointyrestart information found in 03/Y¥S 
Checkpoint/Bestart, GCZ6-3784. The topics covered in this chapter are: 


Ss 


e Restarting a Job 
e Cperator Restart Considerations 


e Job Journal Data Set Usage 


RESTARTING A JCE 


SSseeaneesie SS SSS 


When a job step abnormally terminates, you nay have to resubmit the job 
for execution; this means delay and lIcst ccmputer time. MIhe operating 
system provides restart facilities to reduce the effects of abnormal 
terpination. 


There are three types cf restarts: 
* Step restart, from the begiininy of a jok step. 


e Checkpoint restart, from a checkpoint within a job step. Checkpoints 
are established in a jok step Ey coding the CHKPT macro instruction 
for each checkpoint desired. A checkpoint is taken when a user 
program issues the CHKPT macro instruction. This macro causes the 
contents of the program's virtual-storage area and certain systea 
control information to be written as a series of records in a data 
set. These records can then be retrieved from the data set if the job 
terminates abnormally or produces erroneous output, and the job can be 
restarted. Restart can take place immediately (initiated by the 
operator at the conscle) or ke deferred until the jcb is resubmitted. 
In either case, the time-consuming alternative of rerunning an entire 
job is eliminated. 

The CHKPT macro is described in OS/¥S Data Management Macro 
Instructicns, GC26-3793. See also the DD CHKPT parameter in OSy/VS2 
JCL, GC28-C692. It specifies that checkpoints are to be taken at end 
of volume for the data set defined by the DD statement on which it is 
coded. 


* System failure restart, by specifying the FAILURE=RESTART parameter on 
the JES3 /s/*MAIN statement. In the event the job cannot complete 
executing because of system failure and the job is not eligible for 
MVS automatic restart, JES: will automatically reschedule the job froa 
the beginning. Other opticns on the FAILURE parameter are CANCEL, 
HOLD, and PRINT. All of tle values are described on the MAIN FAILURE 
Farameter in the section, in OS/V¥S2 JCL, GC28-0692. 


Whether using step restart oi: checkpoint restart, the restart facility 
can be autoaatic or defecred. 
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definition) parameter on the JOB or EXEC statement. JES3 creates a job 
journal for any job specifying the RD parameter. (A job journal is 
established to hold restart information for each program in execution.) 
When a system failure occurs or a job step abnormally terminates and you 
have a job journal, the restart facility allows automatic restart when 
RD=R is coded on the JCB or EXEC statements. If checkpoints are taken, 
you can automatically restart at the last checkpoint regardless of 
whether or not the RD parameter is coded. When a job ster abnormally 
terminates or a system failure occurs while the job is in execution and 
the installation has not implemented job journaling, these jobs are 
ineligible for automatic restart. 


Deferred Restart: To use deferred restart, code the BESTART parameter 
on the JOB statement. This required parameter specifies a job step or a 
step of a cataloged procedure and can specify a checkpoint identifier if 
you are using deferred checkpoint restart. The effect of the parameter 
is simply to restart the job at the beginniny of the specified step or 
checkpoint. The SYSCHK CD statement is required shen a job is being 
submitted for deferred checkpoint restart and pus: be placed immediately 
after a JOBLIB DD statement. 


Jobs_Running_op_ASP_Main_ Processors: The MAIN JOESTEP parameter 
specifies the job stez checkpoint option for jobs on ASP main processors 
only. The checkpoint option will not be taken if JOBSTEP=NOCHKPNT is 
coded or if nothing is coded; the checkpoint will be taken at the end of 
each job step if JCBSTEF=CHKPNT is coded. [f a checkpoint is requested, 
it means that the user can see the output up through the last completely 
executed step if a system failure «cccurs and the job is not restarted. 
Otherwise, there is no jok-producec output. The MAIN JOBSTEP parameter 
is ignored in HVS; the job step checkpoint feature is standard. The 
automatic and deferred restart facilities described above are not 
available tc jobs running on ASP main processors. 


Refer to OS/VS Checkpoint/Restart, GCz6-3784, fo. a ccmplete description 


of planning for and using the checkpoint restart facility. 


OPERATOR RESTART CONSILCERATIONS 


A job may be aknormaliy terminated as a result of a hardware, 
Frogramming, cr system error. Such an errer may occur any time during 
execution and could cost the loss of valuable machine time. The 
checkpoint/restart feature of the system is provided to allow a restart 
of an aknorpmally ended job either at the beginning of a job step or at a 
checkpoint within this step. The programmer determines whether an 
automatic restart or a deferred restart 1s to be performed. 


AUTOMATIC RESTART 


If the programmer provides for an automitic restart and the jok does 
abnormally end, you will receive mnessag2 IEF225D asking if the indicated 
jor should restart. The messaje aay indicate the caeckpoint id, thus 
allowing you to prevent repeated restarts at the same checkpoint cr job 
step. When you are requested to authorize an automatic restart, you can 
reply YES, HCLE, or NC. 


e Reply YES if the restart 1s to be performed at a specific checkpoint 
or job step for the first time. If a step restart is to occur and tke 
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step to be restarted used a card input data cet that was not fart of 
the SYSIN stream, you must return ali cards read by the job ster 
before it ended abnormally tc the apjopriate hoppers. If a checkpoint 
restart is to occur, follow the proyrammer's instructacns for 
replacing the input cards. 


® Reply HOLT if you want to defer the restart; for example, to permit 
another jck to be run first. You must enter the *MCLIFY command with 
the release operand when you are ready to restart the job. Alsc, if 
desired, you may cancel the job. However, canceliny the jok may 
result in unrecoverakle pag nj space or the failure of certain data 
sets to ke deleted if virtu:l Iy( is being used. 


e Reply NO if no restart is t« be performed. When you reply NG, and the — 
Frogrammer wants a restart 1.0 be performed, he tust resubnit the job 
for a deferred restart. 


When V=R is specified, the restart may be delayed by the system waiting 
for the allocation of storaye. If another jot is using the required 
storage, you will not receive a nessage - only a delay. Enter a CISPLAY 
A command to see if a system task or other jot is using the storage 
required by a job with a V=R region. You may stop or cancel the 
conflicting task or job. The system may ask you to mcunt data volumes 
other than those required at the beginning of the job. The jok's Iyo 
will be set up ty JES3 for the first jcb step, not the step beiny 
restarted. Canceling a job in a dependent network will prevent 
successor jobs from executing if they are dependent igen successful 
completing of the canceled job. 


Note: Any operator commands in the input stream of the job step being 
restarted will not be executed. 


DEFERRED RESTART 


If the programmer frovides for a deferred restart and the job does 
abnormally end, the job must be resubmitted to have this restart 
performed. To restart the job, the programmer must provide a restart 
deck for submission to the system throuyh the system anput reader. The 
JCL statements to be included are described in detail in the publication 
OSZ¥S2 JCL, GC28-0692. , 


The device configuraticn of the sy:item at the time cf restart need not 
be the same as it was when the job was abnormally ended. However, 
enough devices must be available t: satisfy the needs of the job ster 
being restarted. The system under which a step restart is run need not 
be the same as it was for the job’: original execution. However, a 
checkpoint restart should be run uider the original system unless the 
alternate system can meet the following restrictions: 


e The release number is the sane. 

© The link pack area modules in us: at the checkpcint must reside in the 
Same storage locations. 

e Jobs specifying V=R require an area of storage identical to the 
original area. 


If the required storaye is not available, the system will cancel the 
restart and you will receive messaye IEFF2091 which states that virtual 
storage is unavailable for the jok. 


If the required storaye is not available, it is for one of the following 
reasons: 
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e The link pack area expands into the required storage. This may occur 
if an initial program loading has been performed after the original 
execution of the job and prior to the restart. If this does occur, 
contact the system programmer for a respecification of the systen 
parameters and repeat initial program loading using the new values. 


e The system queue area expands into the required storage. When this 
occurs, contact the system programmer for a respecification parameter 
and repeat initial program loading using the new SQA value. 


When a job restarts correctly, you will receive two messages: IHJ0061 
and IHJ0081. If, for V=R jobs, these messages do not appear, enter a 
DISPLAY A command to see if a system task or other jok is using the 
required storage. You can then stcp or cancel the conflicting job. 


The systep may ask that you mount volumes other than those required at 
the beginning of the job. The jct's I/O will ke initially setup by JES3 
for the first job step, not the step being restarted. in addition, any 
card input data sets that have been used by the failing job step sust 
again be made available to the systea. 


Restart of JES3 controlled jobs way ke accompanied by messages IAT2006 


andyvor IAT2575. Refer to OS/VS !essac2 Libkaty: J#53 Nessases, 
GC38-1012 for response to the me: sages. 


SSeS SSeS eS Se SSS SSS See 


The job journal is a sequential ata set that resides on the spool 
volume of JES3. Unique to ¥S2, ts fuaction is to contain a set of 
selected job-related control blocks that are critical to automatic 
restart processing. in 05/7360 MT systems, the informaticn now in tke 
job jcurnal was available for re: tart processinj from the SY¥S1.SYSJOBQE 
data set. 


The jcb journal is necessary bec. use VS2 maintains its scheduler centrol 
blocks in the scheduler work are. (SWA) in pageable storaye, rather than 
on a job queue on external storace. When a jok or the system fails, 
there is a resultant loss cf the address space that ccntains the SWA and 
its job contrel blocks. Because it preserves up-to-date copies of 
certain critical control blocks, the jcb journal pakes it possible to 
reconstruct the SWA. SWA contro: blocks will be reconstructed to their 
state just prior to the failing :tep for automatic step restart. For 
automatic checkpoint restart the: will be reconstructed as they appeared 
at the most recent issued CHKPT. This. capability is available for the 
following kinds of restart: 


* Automatic step restart 
e Automatic checkpoint restart 
e System restart (including ccapletio: of job cr step termination) 


Therefore, if a jck dces not have job journaliny, automatic restarts 
cannot be used. 


Jok jcurnaliny is ;rovaded to a jok i. JEsj in one cof three ways: 


© The job class of the jct has reyues ed journaling (JCURNAL=YE- cn the 
CLASS initialization Sst. tegert). 


e The job has a //*MAIN c:rd with JC! NAL=YES overriding the jor class 
table. 
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® The job's JCL has eitrer RESTARV= on tne JCE statement or RD= on the 
JCE or EXEC statement. 


& 
After a system failure and JES3 restart of the failing gain processor, 
those jobs in execution that had requested job journaling will be MVS 
system restarted (or warmstarted). If a job is eligikle for mvs 
automatic restart, the operator will te sent message I=F225D asking if 
the job should restart. If the job is not eligible for restart, or the 
operator indicates that restert should not be attempted, any scratch or 
VIO data sets the ject had aliocated will be deleted ‘and the jok will be 
terminated, Therefore it ma; ke desirable for certain classes of jobs 
which make a significant use of scratch and/or VIC data sets to request 
job journaling. 


JESZ INTERNAL CHECKPOINT DATA SET 


The JzS3 checkpoint data set provides the capability for warustarting or 
hotstarting the JES} system with ninimum or no loss cf systen 
informaticn, In the restart process, validation of checkpointed 
information occurs with instances where one or more user-subsitted jobs 
may be canceled as a result of invalid data. The typical situation will 
be no loss of system information. 


The JES3 checkpoint facility is implemented by writiny job-related 
control block information to the JES3 checkpoint data set at appropriate 
pcints in time during system processing. That is, as information 
changes in the systen. 


The JES3 checkpoint data set contains sheckpointed information as 
defined by the IATYCKE macro. Tlis macro defines the job control table 
(IATYJCT) head and tail peinter .-ile description tlocks (FDEs) for the 
sixteen JCT priority levels repr: senting the JzS3 job queue. From tke 
JCT, the JES3 jeb related contro. blocks can be accessed in order to 
perform JES3 job processing. In addition to the JcT, file description 
blocks for special JES3 job proc: ssing facilities are checkpointed as 
follows: 


e Main Levice Scheduler Volume Uravailable Table -- this table contains 
volume serial numbers of volumes unavailable to MDS processing. 


e Output Service -- checkpoint record :ontaining three FDBS required to 
checkpoint the Output Service Iriver module (that is, the IATYJDA, 
IATYJDS, and IATYCSE control blocks). 


e Deadline Scheduling -- contains a ch:ckpoint of the Deadline 
Scheduling Queue control blocks. 


© JES3 NEWS -- checkpoint of the JES3NEWS data set. 
© TSONEWS -- checkpoint of the TSCNEW: data set. 
© RJPNEWS -- checkpoint of the R. PNEWS data set. 


e Generalized Main Scheduling -- used to checkpoint GMS Selection modes, 
Execution resources and various GMS parameters. 


e Device Fencing -- checkpoint of the device fencing control blocks. 


« Dependent Job Control -- checkpoint of the IATYNCK control blocks 
which contain the net control block FDBs. 


« Main Device Schedule -- checkpoint of the online/offline status of 
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devices eligible for setup. 


e System Parameters -- miscellaneous parameters checkpointed in the 
IATYCKP ccntrol block are: : 


- Last job number assigned in the systena 
~ One-half the size of the Track Allccation Table 
~ Number of gueue extents | 
~ Single track allocation takle 
- JCT priority hold flags 
The JES3 checkpoint area is allocated to a unique data set and is 


managed via the EXCP macro instruction. A user of the checkpoint area 
causes a checkpoint to be taken by issuing the JESCKPNT sgacro. 
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The routiny and descriptor codes, user completion codes, and systes 

completion codes for JES3 are presented in the topics that follow. This 
section contains information that is 1n addition to that found in CS/V¥S 
Lary: WS2 System Codes, GC38-1008. 


Message Lib 


Route codes and descriptor codes 


ire specified in the ROUTCIE and DSEC 


parameters of the WIO/WTOR macro .astcruction. Information contained in 
this chapter is in addition to roiting and descriptor code information 


found in Q$/¥5 Hessage Library: 


GC38-1004. 


:guting and Descriptor Codes, 


The following routing and descrip..or codes, shown in Figure 14, are used 


by messages issued during JES3 in..tialization and termination. 


Figure 14. 


c--— 


= 
| Cescriptor | Message | Routilg 


| 
| Ccde | Ic { Code | 
|-- nf nn fp | 
! 4 { IagT3cco | 2,10 | 
| 4 { IAT3010 | 2 si 
| = { IaT3011 | 1 | 
! - { Tav3012 | 1 | 
| 3 | ITaT3013 | 1 | 
| 1 { TAT3014 | 2,10 | 
| 1 { IAT3C15 | 2,10 | 
| 4 { IAT3016 | 19 =| 
| 3 | IAT3C19 | 1 | 
| 4 { IAT3020 | 2,10 | 
| 4 { IAT3¢C21 | 2,10 | 
| 4 {| IAT3022 | 2 1] 
I 4 {| IaAT3023 | 2 | 
i 3 { IAT3025 | 2 1 
| 3 | TaAT3C26 j 2,10 | 
| 3 { IAT3027 | 2 | 
| 1 {| IaT3032 | 2,10 | 
| 2 ( IAT3033 | 1 { 
{ 1 {| IAT3034 | 2,10 | 
( 1 { IAT3035 | 2,10 |{ 
| 4 } TaT3C40O | 2 | 
( 3 | IAT3041 | 2 | 
| 3 } IaAT3042 | ae | 
{ 7 { IaT3043 | 1 | 
| = { IATI0ONYG | 1 | 
{ 3 {| TavT3045 | 1 | 
I = { IAT3046 | 1 | 
| 3 | IAT3IO48 |} ye | 
\ 3 { IAT3049 | z 4 
| 4 | TAT3060 | 2 4 
| 4 { Iaf3cé61 | 2,10 |{ 
! 1 | IavT3090 | 2 | 
| ee | 


Routing and Descripto:: Codes Used During Initialization 
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After JES3 initialization, routing and descriptor codes are isplemented 
by a JES3 subsystem interface routine that examines the RCUTCDE and DESC 
parameters specified with WTO macro instructions. 


Messages are directed by JES3 to the appropriate JES3 andyor MCS console 
device. In the event no ROUTCDE 1s used JES3 assumes a route code of 


SYSTEM COMPLETION CODES 
JES3 uses the following system completicn codes: 


AES 
EXPLANATION: (When caused by IATDHMEB) 


e The data set has been closed and the user is still attempting to 
perform I/c - IAT1601 fointed to by register 15. 


e The IATYDSB and IATYSVT control blocks were not valid - IAT1602. 
e Invalid function code passed - 11171603. 


® Error return from a start I/0 operation in the user's address space - 
IaT1604 and IAT1605. 


® IATYDAT address not within a correct address range - IAT1606. 


® Could not allocate an unprotected buffer for a FOINT operation - 
IAT1607. 


e While attempting to set up a data management WAIT, a data management 
function was currently waiting - IAT1609. 


e while attempting to set up a subsystem interface WAIT, a sutsysten 
function was currently waiting - IAT1609. 


e An invalid IATYDAT was found on the DAT Queue. 
e An invalid unprotected buffer ad¢ress was found - IAT1608. 


SYSTEM ACTICN: The step is terminated. 


QEERATOR RESECNSE: None. 


pe EL 


Se Se eS a Se 


PROBLEM DETERMINATION: Rerun the job with a SYSABEND DD card if 
Y 


necessar 


MCDULE: ZATDMEB 


EXPLANATICN: (When caused by IATSTII#) 


e No JDSENTRY was found when an attempt was made to update it during 
unallocation - IAT6700. 


e xrror occurred in the disk MRCH c<llocator routine when tryinj to open 
the data set - IATo702. 
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°® A catastrophic error occurred an the global processor while 
attempting Communication - IAT6703. 


e A user memory buffer could not be allocated to a data set during OPEN 
- IAT6704. 


e No core was available for global interface for external writer data 
set - IAT6706. 


e Unable to find OSE at unallocation for external writer - IAT6707. 
e Permanent IvO error encountered on an output data set - IAT6708. 


® Bad data was sent to global via a SSISERV. Request could not te 
serviced - IAT6711. : 


SXYSTES_ACTION: The user memory is terminated. 


QEERATOB_BESPONSE: None. 


PROGRASMER_BESPONSE: Take problem to your systems programmer. Supply a 
SYSABEND dump. 


PROPLEM DETERMINATION: Rerun the job with a SYSABEND DD card if 
necessary. 


2E8 


EXPLANATICN: The JES3 address spi:ce has abnormally terminated. There 


are two environpents in which thi:. error may occur: 


1. A critical error has occurred :arly in JES3 initialization or late in 
JES3 termination. The JES3 ES':AE has not yet been set and no JES3 
formatted ABEND duap is availa:;le. 


2. Once JES3 initialization has completed up to the point where the JES3 
ESTAE exit (IATAEMN is the exi. routine) has successfully been 
established, this abend code i.: used by IATAEMN (the Failsoft 
Monitor) to return to the ESTA;. exat level for various reasons in 
order to ke able to issue a SE:'BF macro iistruction, 


One reason is to produce an OS/MVS dump, dhich will therefore always 
appear as a S2FB regardless of the original abend code. The original 
abend code is shown in the Failure Logout ,;IAT3713 messages to the 
operator) and in the JES3 formatted dump. The occurance of an S2FB 
dump by itself does aot tell yet whether the failing JES3 function 
could recover or had to be terminated. 


An OS/MVS dump with an abend code of SzFB means that IATABMN or a 
routine employed by IATABMN failed and thereby produced that atend 
code. JES3 was terminated as a result of that. 


1. Message IAT3702 is written to the operator and to the (JES3 
initialization) specified dump data set. This message details 
certain critical debugging information that is needed in analyzing 
the problem. An abend dump of the type srocified in the J=S3 
initialization deck is taxen. 


‘ 


1. Refer to the explanation of the indicated IAT3nnn message for 
information on the cause of the error and necessary remedial action. 
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2. The abend dump that is produced shculd be reviewedyanalyzed for the 
cause of the error. If a DUMPnnon is indicated, refer to the summary 
of the JES3 DUMP errors for further: information. 


Se Gen = SSS SSIS SS See 


6C38-1012. 


Table III, items 4, 5, 6, 20. See CivV¥S2 Message Library: JES3 
Messages, GC36-101z. 


ass 


1. As indicated for the IAT3nnn nessage. 


2. IATNUC (csect IATAEBMN); service for all DSéEs. 


* Could not obtain enough storace in SP=241 to build a DSB. 

e Could not cbhtain enough storace in SF=241 to create a RAP. 
SYSTEM ACTION: The user memory is terminated. 

OPERATOR RESPONSE: None. 

PROGRAMMER RESPONSE: Take the proklem to a systems programme:. 


PROBLEM DETERMINATICN: Rerun the job with a SYSABEND DD card if 
Necessary. Problem may not reoccur. 


MCDULE NAME: IATSIDM 


e® Unable to obtain sufficient storage in SP=241 for SSISERV. 


e Unable tc cbhtain sufficient storage in SP=230 for user memory 
buffers. 


e Error processing TCE for additional track groups. 


SYSTEM ACTICN: The user memory is ter sinated. 


OPERATOR RESPONSE: None. 


See ee Se eS eee 


PROGRAMMER RESECNSE: Take the problem to a systems programmer. 


PROBLEM DETERMINATION: Rerun the job with a SYSABENDT [CD card if 


Sw ee SS eS Se SSS Se eee 


necessary. Problem may net reoccur. 


=FB 


allocation subsysten interface routine. R815 has a program loaded ahbend 
code to uniquely identify the cause of the abend. The codes are: 
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1 In common allocation tie numter of units to be allocated Ly JES3 
does not equal the nuacer requested by MVS. 


2 Unable te successfully issue an ESTAE duriny deallocation 
processing. 


3 Unable to obtain storaye for a dynamic allocation buffer. 
4 Unable to obtain storaje for a Change [DDNAME buffer. 


5 Unakle tc find the address space ID associated with the request in 
any of the memory headers, 


6 JST point errer occured during common allocation or deallocation. 
For Code 1: R3-units requested, R5-units passed. 
For Codes 2,3,4,6: R3 has the macro RIN code. 
For Code 5: R2-A(JSCb), R3-Address space IL. 
SYSTEM _ACTION: The affected task is terminated. 


PROGRAMMER RESPONSE: None. 


PROBLEM DETERMINATION: Table I, Iteus 1, 3, 5A, 15, 16, 29. See QS/VS 


EXPLANATION: Register 15 contains a reason code in the hi-order Lyte 


and a return code in the low-order byte. 
Reason Code 0 


Subsystem Interface Common Services has detected an error in its calling 
parameters or in the system status. Return codes are: 


24 The caller of SSICS is not in a system protect key 0-7. 

28 The main processor specified by SYSID in the SSISERV macro is not 
defined. 

32 An invalid combination of fields SELECBF, SELEXIT, SELBUFF was 
found in the IATYSEL control block for a WAIT or REPLY TYPE 
SSISERV request. 

36 An error was detected attempting to write a stajing area. 

40 The primary and all secondary staginj area extents have been 
exhausted. 


Reason Code 1 


An error return was taken from JzS3 macro IATXEGM or IATXEFM. See JES3 
macros manual for explanation of return codes, 


Return codes are: 
8 GETMAIN/FREEMAIN failed 
Reason Code 2 


An error return was taken from MVS FREECELL macro. See MVS macros 
Manual for detailed explanation of return codes. 


Return codes are: 
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8 cell address is invalid 
12 no cell pool 
16 invalid cell feol id 


Reason Code 3 


An error return was taken from MVS BLDOCPCCL mac.o. See MVS macros 
manual for detailed explanation of return codes. 


Return codes are: 


4 GETMAIN failed 

8 invalid cell pool id 

12 non-glotal subpool 

16 cell size greater than fool size 


Reason Code 4 


An error return was taken from FVS GETCELL macro. See MVS macros manual 
for detailed explanation of return codes. 


Return codes are: 


8 chain pointers destroyed 
12 no cell ¢feol 
16 invalid cell pool id 


SYSTEM ACTICN: A dump of CSA, SQA, and the MVS trace table is taken to 


a SYS1.DUMP data set and tie curcent memory is abended. 


NOTE: If the current memory is J2S3, an error return is taken to JES3. 
The calling DSP is then abended «sith a DMO14 abend code. 


OPERATOR RESPCNSE: Restart system if JES} has abended. 


PROGRAMMER RESPONSE: For Reason Code 0 refer to the SSISERV macrc for 


Tatle I, item 2. Table III, items 1, 4. See OS/V¥S Message Library: 


MCDULE 


oe 


IATSSCH 


EXPLANATION: A catastrophic error occurred durinyj the execution of the 
MVS-JzS3 dynamic device reconfiguraticn (DDR) subsystem interface 
routines. 


SYSTEN_AC 


14 
tH 


ON: The swap is terminated, 


OPERATOR RESPONSE: If the swap was operator initiated, retry. If the 


See BS Sle SS SSS es 


Swap was system initiated, no acticn is required. 
PROGRAMMIR RESFCNSE: None. 


mee Beene eee ee eee 


PRCELEM DETERMINATICN: Table i, Items 5A, 16, 29. 


Se SS Se SS SS eee ee 


EXPLANATION: An ergeer has accurred in one of the Interpreter Service 
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non-JES3 supfort areas. 


Register 15 contains the return code: 


se) 


An error has occurred in the Initiator Queve Manager Interpreter 
Interface (IATIIII). Register 9 points to a work area which will 
have formatted messages in it (IAT4901,2,3). 

An error has occurred in a USAM FCINT or WRITE operation out of an 
interpreter subtask. 

An invalid DSB error in USAF initialization processing out of an 
interpreter subtask. 

An error has occurred in UAM buffer initialization out of an 
interpreter subtask. 

An invalid return from the OS ReaderyInterpreter has occurred. A 
duap is taken to SY¥S1.DUMP and the current task is detached. 
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DSS is a debugging tool that IEM vrogram System Representatives and 
user-authorized personnel can use to identify and provide temporary 
corrections to software errors in the operating system (OS,/VS). 
Informaticn presented Lelow is in addition to that found in OS¢/VS 
Dynamic SUpFort System, GC28-0640. 

ASP main processors running MYT or VS2-1 should have the CTC monitor 
inactivated when DSS is used on the global JES3 processor to frevent 
being disconnected. The following command will prevent main task 
monitoring of the CTC: 


*T pain-proc-nage,F &T,P=C 
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An ASE to JES3 migration aid, available with an appropriately updated 
level of ASP Version 3.1 and akove, allows access of an ASP support 
processor to a global JES3 SVS processor. The migration aid allows 
production testing of a JES3 systems while the kalance of the work is 
handled by the ASP system. When a jot terminates, output can te printed 
by the JES3 global processor or returned to the ASP support processor. 
The aid consists of two callable DSFs. Cne executes under ASP Version 
3.1 on an existing ASP support processor (ASPAID) and the other executes 
under JES3 cn the global processor (JESAID). CTC support routines are 
also provided. Each DSP will communicate with the opposite processor by 
a comspon CTC device. The aid permits the operator on the ASP system to 
select jobs to be routed to the JES3 system based on class, group, point 
of origin, user specified parameter, or exit routine. The jobs are 
routed to JES3 for input processing, execution, and output processing, 
or may be routed for execution only, and returned to the ASP system for 
output processing. 


ASPAID enables job selection based on operator, installation or user 
specifications, provides post JES3 processing options and suppforts the 
ASP side of the CTC adapter connection with the JES3 system. 


JESAID supports the JES3 side of the CTC adapter and provides reader and 
writer services. 


EQNCTIONAL QVERVIEN 


JES3 FROCESSGE 


Module IATADJP is scheduled for execution via an operator call to the 
JESAIC DSP (*X JESAIL). 


IATADJP interfaces with the JES3 operator to initialize, modify or 
terminate JESAID functions, responds to reader and writer requests, and 
services the CIC for data transfer ani interrupt handling operations. 


All jobs submitted via the JESAID reader are assiyned a jcb oriyin of 
"ASPSY¥YS." SYSOUT data yenerated ny jobs whose origin is "ASPSYS" will 
be gueved by output service for the JESAID writer device type unless a 
valid JES3 destinaticn 1s specified by a //*FCRMAT card or SYSOUT LD 
Specification or S¥YSCUT class cazd definition. S¥SOUI data queued for a 
valid JES3 destination is processed by the JES3 output servace writers. 
SYSOUT data queued for the JESAI} device type is selected by the JESAID 
writer and returned to the AS? system, via the CTC, for ASP PRINT, 
PUNCH, ACDS, etc. processing. 
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The JESAIC writer is a "hot writer". It 1s posted by output service 
whenever SYSOUI output is queued for the JESAID device type. Data sets 
are selected using the IATXOSWS macro. Each data set selected is 
transmitted tc the ASF system and written by ASP module AIDADAP into the 
JUS/MRF for the associated jok. 


The JESAID writer transmits a data set open message providing ASP module 
AIDADAP with the required information to locate or create a JDS entry 
and initialize a MRF with an ASP header record. A “write-tape-mark" 
control write initiated by JES3 module IATADJP signals "end-of-file" to 
ASP fer the data set being transmitted. 


Pata sets unable to be successfully transmitted to ASP are requeued for 
JES3 processing based cn the alternate destination selected by the 
operator. 


ASP PROCESSOR 


Module ASFAID is scheduled for execution via an operator call to the 
ASPAID DSP (*X ASPAZD). 


ASPAID interfaces with the ASP operator to initialize, modify or 
terminate ASPAID functicn, handles ASF- IDADAF communications, monitor 
the job flow to/from the JES system, ant determine a job's post-JES 
plocessing requirements on the ASF syst:a. 


INITIALIZATICN PROCESSING 


JES3 Initialization 


a 


During JES3 initialization, each processor defined via a MAINPRCC 
control card as SYSTEM=ASFAPD will have a main service control block 
structure built as though an MVT/VS2.1 ASP main had been defined with 
the following exceptions: 


e The associated CTC UCB will not be initialialized with the sense 
SRE/IOSB.: 

e The MPCDATA Csect will be chained only from the SVT. Any processor 
defined as "SYSTEM=ASPAD" will te known only to the JESAID CTC for 
data transfer and interrupt haniling operations. 


The JES3 initialization deck must contain the following tc permit JESAID 
reader, writer and CTC processing: 


e A DEVICE card defining the GROUP and DEVICE name to be associated 
with the JESAID reader and writer. ‘he DTYPE must be AID and the 
DGROUP aust be ASPSYS. 

Example: 


DEVICE DTYFE=AIL, INAMF=AIDRIR, CGROU 2=ASPSYS, UNIT= (NONE,SY¥1,,08) 


64 JES3 Release Guide (VS2 Release 3) 


e A FAINERCC and DEViCe cara defining tke CTC adapter used to 
communicate with the ASP systea. The "SYSTEM" parameter on the 
MAINPROCS card must Fe "“ASPAC". JES3 initialization will initialize 
the required contr3l blocks and takles but the defined processor will 
enly be known to the JESAILC DSF. 


Example: 


DEVICE,DIYPE=SYSMAIN, JNAME=SYAIC,JUNIT=(4B0,SY1,,CFF) 
MAINPRCC,NAME=SYAIL,SYSTEM=ASPAL,ACAPTZR=4B0, 
CTCCUA=(1,2) ,MAINCTC=4B0 


The CTCCUA parameter is required but need not reference SYSGENed 
devices. The above example assumes that SY¥1 ais defined as a global 
JES3 processor. , 


Curing JES3 Initialization, "SYSTEM=ASPAD" processors are handled 
somewhat like "SYSTEM=ASP" processors, Therefore, JES3 module 
IATINJE expects an IPL text file to be included in the JzS3 
initialization deck. If no otnoer "MNYT/VS2.1" systems are defined to 
JES3, a dummy IFL text file is needed to satisfy the IATINJE 
requirement, 


Example: The following satisfies the dummy IPL text requirement. 


x 


* dugmy ipl text for asp processor 
* 


ipl,end 


See SSS eS eee sees 


The JES3 system must ke defined :c ASF as a real main processor via the 
appropriate MAINPRCC and DEVICE cards in the ASP initialization deck. 
The defined system may be used a; an ASP remote main (MVT or VS2.1) 
until such time as it is initial zed as a JES3 processor. Otherwise it 
should be set offline at ASP ini:ialization time. Only those devices 
required for use as a real ASP main need be defined to this processor. 


The ASP MAIN, when initialized a: a JES3 processor must be offline, with 
all functions terminated. This offline status will be maintained while 
ASPAIL is active. MAINIO for specified main will be disabled until the 
ASPAID is terminated. 


INPUT SERVICE PROCESSING 


JES3 module IATISMN ignores all valid “JESOPT" parameters on //*MAIN 
cards but will flush all jobs with invalid syntax in a "JESOPT" 
parameter. ASP input service will no: queue any jobs for transaission 
to JES3 if errors are found while processing a "“JESOPT" parameter. 
Therefore, the presence of an error in a "JESOPT* parameter indicates a 
job origin other than the ASP systea. Additionally, "JESOPT"® syntax 
errors may imfact the frofer handling of subsequent //*HAIN card 
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parameters, 


ASP Processing 


ISMAIN scans the JESOFT parameter on the //*MAIN card for migration 
scheduling options. 


//*MAIN [ JESOFT={n{ (n,j,5,M) }]) 


n - specifies the scheduling oj;tion if the job completes normally on 
the JES systen. 

j - specifies the scheduling oftion if the job does not complete 
processing (that is, not thru main) on the JES systea. 

S - specifies the scheduling oftion if the JES system fails and is 
subsequently CCLD STARTED. 

M - if specified, requests that the job be migrated. 


The options for the n, j, and s parameters are: 


R - reschedule the jcb for the JES SE (valid only for the s parm) 

A - run on the ASP system (if specified for DJC, jcbs will default to 
Q) 

@ - schedule only the output ISPs and PURGE 

C - schedule only for FURGE pracessing on the ASF systen 


Example: The following JZSOPT par impeter causes ASPJOB to be transmitted 
to JES3 fer processing and Purged on ASF if compleced on JES3 or run on 
ASP if incomplete on JES3 or run nh ASP if the JES3 system fails. 


7/7ASPJOB JOB ,AARDVARK 
//*MAIN JESOPT= (0,A,A4,5) 
// EXEC PGM=XYZ 


The following DSPs are defined as OUTPUT processors (that is, frocessors 
to be scheduled when '0' is speci ied): PRINT, PUNCH, and ACDS. 
Additional CSFs may be defined as OUTPUT processors for post-JES3 
processing by using the OUTPUT (CO TEUT=yes) parameter in tke DSPDC macro 
for the selected DSF in RESPARAM, 


ISJES, after the ASPAID DSE has ben called, selects jobs: to te sent te 
the JES system based on the ORIGI , CLASS, or GROUE spec3.fied on the 
ASPAID call or subsequent STARI, 31r when specified on the //*MAIN card 
(for example, //*MAIN JESOPT=(,, M)). 


The transmission of [CJC jobs is de Fendent on the first job entered for a 
given net. If the first jor of a net 2s sent to JES3, all subsequent 
jobs for the net are sent to the .ES3 system. If the first jok is not 
sent to JES3, subsequent jots for the iet are not selected for 
trans@ission. Nets sent to JES3 will only be allowed to pfrocess output 
on the ASE system. 


A user exit is provided tc cverrive the above selection criteria. This 
is accomplished by setting/cleariiuy the ISAIDFL ISJMGRT flag. If the 
selecticn criteria in the exit causes jartial [TJC nets to ke sent to the 
JES3 system, the results are unpredict: ble. 


Jcbs submitted with an erro: in t.e JESIET parameter cn the //*MAIN card 
ate not sent to the JES3 sy:tem. Jebs specifically requesting Bagration 
are held to allow the operator to run cr cancel th: jck on the ASE 
syste® if ASPAID has net becn cal.ed. The status »f a jok selected for 
trans@ission to JES3 cannot te al ered via ASP "soiify" once input 
service ,rocessing for the -ob is complete. 
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JSS PROCESSING (ASP) 


Jobs to be sent to JES3 are cheduled ‘or transmission in a manner akin 
to main scheduling, if ASFAI is activited. A RESQUEUE (RQ) entry is 
built for each job to be sen:. to JES3 ind added to the BG chain and 
JESRG subchain. When a RC Ei: is returied for the transmitted job, JSS 
marks the appropriate SE's conplete fo: the job kased on the code 
returned by the ASPAIL ESF fer the jot. The return ccde is based on the 
Fost JES3 processing oftions selected. 


OUTPUT SERVICE FROCESSING (JES3) 


During OSE construction, JES3 module IATOSDR determines if the 
destination requested for jobs whose jcb origin is ASESYS is a valid 
JES3 destination and queves all SYSOUT data sets with invalid JES3 
destinations as though no destination had been specified. (SYSOUT data 
sets are queued for a device within the same GROUF as the job's input 
origin device.) 


Therefore, SYSOUT data to be transmitted back to the ASP system can be 
selected by a writer that processes SYSOUT data for an output device 
within the "ASPSYS" GRCUP of devices. 


PURGE PROCESSING (JES3) 


JES3 module IATPURG issues an INTERCOM macro directed to the JESAID DSP 
during the Purge processing of each job whose job origin is "ASPSYS", 
The text of the messaye contains the terminating JES3 job number and a 
flag byte defining the termination status of the job (such as JCL error, 
AEEND, or operator cancel). 


Upon receipt of this message, JES3 module IATADJP ccnverts it to the 
format expected by the ASFAID DSF and transmits it to ASP module AILADAP 
as a console messaye which is ro.ted bry AIDADAP tc the ASEAID DSP. 
ASPAID uses the messaye content to determine post JES3 processing 
requirements within the ASP systea. 

Example: 

JES3 job nuster 0102 as completed JES3 processing normally. 


(message code=x'67', JES3 job number=0102, normal completion 
code=x'Q0"') 


IATPURG Intercoms ~- S JESAID,0102x'CO! 
IATADJP writes as a CTC console message - x'67'0102x'00! 


If JES3 job number 0102 coapleted abnormally, the following is sent: 


(message code=x'67, JES3 job number=0102, abnormal completion 
code=x'Q1"') 


IATPURG Intercoms - *S JESAID,0102x'01' 
IATADJP writes as a CTC console message - x'67'0102x'01? 
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INSTALLATION PLANNING 


The migration aid provides a viable means of selectively processing ASF 
jobs in a JES3 environment while maintaining the integrity of the jobs 
in the ASP queue. Only those resources required by the selected JES3 
processing options (such as consoles or unit record devices), and used 
during job execution (such as tapes or disks) need be committed to the 
JES3 processor. : 


Both ASP and JzS3 function as independent systems. The migration aid 
does not attempt to present a single system image, control the use of 
shared resources or provide control card and JCL compatibilty between 
the two systems. Jobs selected fer transmission to JES3 may also be 
processed through some or all of the ASP Scheduler Elements once JES3 
processing is complete. Therefore, consideration should te given to 
provide compatible job oriented initialization options for both the ASP 
and JES3 systems if compatibility is desired. The following functions 
must be considered fot compatibility ketween the ASP and JES3 systems 
for jobs that are processed using the migration aid. 


OUTPUT SERVICE 


SYSOUT Card Defintions: 


The S¥SOUT class defined to JES3 1s prepajgated to the ASP JIS when 
output is returned via the JESAID writer. To provide similar processing 
of SYSOUT output, under JES3 or ASF, the SYSOUT CLASS definitions should 
be the same. 


Example: 


The following is defined to both ASP and JES3, therefore SYSOUT data 
processing cn either system is the same. 


SYSOUT,CLASS=A 


The fcllowing cards define the same SYSOUT class but with different 
characteristics for each system. Therefore, output will not ke 
processed in the same way. 


JES3 - SYSCUT,CLASS=C,TYPS=FUNCH 
ASF - S¥SCUT,CLASS=C,TYPE=PRINT 


DEVICE Names: 


JES3 output service queues S¥SCUT cutput fer processing by the JESAID 
writer if the jobs origin is “ASPSYS" and no destination is specified or 
ab invalid JzS3 destination is specified or "DEST=ASPSYS" is specified. 
Therefore, only those support devices that physically exist on the JES3 
system need re defined to JES3, The names associated with the JES3 
support devices should be the same as in ASP to eliminat: chanyes to ASP 
jok decks or could be unique names defined only to JES3. 
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Examples: 


The following jcb is submitted to JES3 via the migration aid. SYSPRINT 
is returned to ASP for processing. 


//ASPJOB JCB ,AARDVARK 
// EXEC FGM=ACCCUNT 
//SXSPRINT DD SYSOUT=A 


The following job is submattec to JES3 via the magration aid. 


7/ASPJOB JCB ,AARDVARK 

//*FORMAT PR, DDONAME=SYSPRIUNI,DCEST=RM001 
// BXEC PGM=ACCCUNT 

//SYSPRINT CC SYSOUT=A 


If RM001 is defined to ASP but not to JES3, SYSPRINT is returned to 
ASP. If RM001 is defined to JES3, SYSPRINT is processed by JES3. 


The following job is submitted to JES3 via the migration aid. 


//ASPJOE JOB , AARDVARK 

//*FORMAT PR,DDNAME=SYSPRINT,DEST=RB001 
//*EORMAT ER, CDONAME=SYSPRINT 

// EXEC PGM=ACCOUNT 

//SYSPRINT [TD SYSOUT=A 


If RMCO1 is defined to JES3, SYSFRINT is processed by JES3 and a copy is 
also sent back to the ASP system. If RM0O1 is not defined to JES3, only 
one copy cf SYSPRINT is sent back to the ASP systea. 


MAIN SCHEDULING 


Generalized main scheduling (GMS) job-oriented scheduling inforgation 
(that is, C1lASS names) should te defined the same for ASP and JES3 to 
eliminate ASP job deck changes. Processor names (such as SY1) valid to 
ASP but not known to JzS3 result in s/*MAIN control card errors under 
JES3 for jobs referencing the names. Therefore, //*MAIN cards may have 
to be changed to reference a valid JEFS3 processor if the job is to be 
processed under JES3. Generic names used in ASP job decks aust be valid 
to JES3 to eliminate ASP job deck changes. 


STANDARDS 


Standard job oriented defaults such as FAILURE, FORMS, CARRIAGE, LINES, 
or CARDS should be defined alike for both ASP and JES3 if compatibility 
is desired. 


OPERATOR COMMUNICATIONS 


Proper initialization of the migration aid in the ASF and JES3 systeas 
is required to insure the integrity of the existing ASP system and 
permit the CTC communications to be established in the proper sequence. 
Deviations from the recommended initialization procedure may cause 
unpredictable results. 
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The ASPAID DSP should always be iiitialized first if CTC data 
communication is to be establishei with JES3. 


Once the ASF CTC communication en'ironment has been established, the 
JESAID DSP may be called in the J:S3 systen. 


Termination of the migration aid iay ke initiated from either system via 
a *CANCEL JESAID or *CANCEL ASFAI) operator command, but requires 
operator intervention on both the ASP and JES3 systems to effect the 
complete shutdown of the faciltiy *CANCEL JESAILC, issued first, 
terminates the JES3 portion of th: Migcation Aid and quiesces the CTC 
support within the ASP system. A subs:quent *CANCEL ASPAID effects the 
shutdown of the migration aid facility within ASP and the rescheduling 
of jobs queued for JES3. A *CANCEL ASFAID issued before a *CANCEL 
JESAID terminates the ASP portion of the migration aid and causes all 
JESAID functions to be quiesced in the JES3 system. A subsequent 
*CANCEL JESAIC is required to complete the shutdown cf the JESAID DSP in 
the JES3 syster. 


JES3 COMMANDS 


The JESAID reader queues jobs rec2ived from ASP for the JES3 internal 
reader. Therefore, an internal reader must be active to permit jobs 
transmitted from ASP to be entered intc the JES3 system. To start an 
internal reader enter: 


*X INTRDR 


Similarly, the JESAID writer queues rerouted output fcr an output 
service writer but does not dynamically schedule the writer. Therefore, 
a writer may have to be started t» process rerouted JESAID SY¥SOUT data. 
To start a writer, enter: 


*X WIR,uuu ,,uuusdevice specified as the JESAID alternate 
destination. 


*CALL 
*X JESAID,[{CIC=unit address] 
{ ,RDUR={ STCP} (START,readvr name) }] 
{ »WIR={HOLD|START|STCF{ ({START|STOP, 
alternate destination }) }] 


unit address - identifies the CTC adarter address used by JESAIL to 
Communicate with the ASP system. The unit must be defined to the 
global JES3 processcr as SYSTEM=ASPAD in the JES3 initialization 
deck. No attempt is made to Communicate with the ASP system until 
this parameter is provided. Therefore, the writer STOF option may be 
employed to reroute queued SYSCUT data independent of the ASP 
processor status. The "CTC" must ke defined to JESAID only once and 
may be on the *CALL cr a subsequent *START. Once defined, it remains 
the active CTC device until JESAID is canceled by the JES3 operator 
or is quiesced via an ASP oferator cancel or JESAILC failure. 


START - activates the JESAID reader o1 writer functicn. Cnce started 
they remain active until a STCF or *CANCEL is issued. 


STCP - deactivates the reader or writer function. Jobs normally read by 
an active reader will remain queued in the ASP system. SYSCUT data 
sets queued for the JESAIC writer will be redirected te the alternate 
destinaticn cr deleted if no aiternate destination is specified. 


70 JES3 Release Guide (VS2 Relea: e¢ 3) 


HOLD - signals the J=SAIL wrater to terminate transmission of SYSCUT 
data to ASP after the active data set is complete. All other out;ut 
will remain queued for the writer until a subsequent START or STCP is 
issued. 


alternate destination - a 1-& charact:r name that is usea as the JES3 
output destinaticn for wrater data sets that cannot be successfully 
transmitted to ASP or whenever the writer is in a stopred state. The 
default is no alternate destination which will result 1n the data 
sets being deleted. Any valid JES3 device defined as "DIYPE=PRTxxxx" 
may be used as an alternate destination. SYSOUT output rerouted to 
the alternate destination is printed using installation standard 
forms, carriaye, train, etc.. 


reader name ~ the name assigned to the JESAID reader via the DEVICE card 
in the JES3 initialization deck. The GROUF name associated with this 
JNAME becomes the CRIGIN for all jobs read ky the JESAID reader. 


*START JESAID - (All parameters valid for the JESAIL "CALL" are also 
valid here.) 


Additionally, a "*S JESAID,STATUS" results in the issuing of messayje 
IAT1930 indicating the current status of all JESAILC functicns. The 
"STATUS" request may be included on the same *STARI that contains 
other JESAID parameters but should always be the last parameter 
specified. Any parameters following the STATUS parameter are 
ignored by JESAID. 


Examples: 

*S JESAID,RDR=SICP,STATUS ......Valid 

*S JESAID,STATUS ......Valid 

*S JESAID,STATUS,RDR=STOP ......RDR=STOF will be iynored 


*RESTART JESAID - used to reinitialize the CTC and the active 
reader-writer functions after an ASF or ASFAILT restart if JESAID is 
active. This command should only be used when requested by the 
ASPAID DSP. 


*CANCEL JESAIL - causes the termination of all JESAID functions. A 
cancel transmission will be sent to the ASF system to effect the 
shutdown of the active CTC functions in the ASP system. 


ASP COMMANDS 


*CALL 
*X¥ ASPAID 


(,CTC=unit-address) [,NAME={ sysname |JES}j 

( -CLASS={ jcb-class| (job-class1, job-classz,...,job-classn) | 
/job-class(/ (job-class1,job-class2,...,job-classn) }] 

{ ,GROUP={ job-class~group | (job-class-group1,...,job-class-groupn) | 
/job-class~group|/ (job-class-group1,...,job-class-groupn) }] 

{ ,{ORG| ORIGIN j={origin} (originl,origin2,...,origjinn) }]} 

{ -{NINORMAL J={A{O(C)} (,{ 5) ICBFAIL J={A/01C}] [,{S|SYSFAIL}={B{AJOIC)] 

{ -{ DIDISPLAY }={ CLASS|ORG| ORIGIN} ] 

*X ASPAID - used to iiitialize the ASFAID DSP and allow input service to 
start the selection of jobs that are to be transmitted to JES3. 


unit address - identifies the CTC address used by ASPAID to communicate 
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with the JES3 system. 


sysname - a 1-8 character name used to iden:ify the JES3 system for 
communications purposes. 


Jok selection parameters: 


CLASS - defines the class of jobs that are -o be transmitted to the JES 
systen,. 


GRCUP - defines the jok-class-group-name that is to be used to determine 
the class of jobs that are to be transmitted to the JiS3 systen., 


ORIGIN - specifies joks to be selected for transmission to JES3. 


DISPLAY - displays the CLASS(es) or ORIGIN(S) currently being used for 
job selection. 


Post-JES processing parameters: 


NORMAL ~- defines the action to be taken for a job that completes on the 
JES system. 


JOBFAIL - defines the action to be taken by ASPAIC for a job when JES 
returns a job-fail code for that job. 


SYSFAIL - defines the action to be taken when ASPAID is notified of a 
JES3 system failure or when ASPAID is terminated. (Reference 
*RESTART and *CANCEL ASPAIL) 


The job selection and processing parameters may be overridden Ly the 
JESOPT parameter on the job's //*MAIN card. 


*START ASFAIT - (All parameters valid fer the ASPAID call are also valid 
here. The CTC and NAME parameters will not cause any action to be 
taken if previously specified.) 


START is used to initiate the scheduling of jots that have teen 
selected for transmission and, or subsequently, to modify the ASFAID 
parameters. The scheduling of jobs is started on the start command 
following the command in which the CTC is specified. Until this 
sequence of commands is issued, jobs will only be gueued for JES 
processing. All modifications for selection and failure criteria 
must be communicated in this manner. If the CTC ,;arameter is 
specified on a START command, a subsequent START ccumgand must be 
issued to initiate scheduling. 


*RESTART ASFAID - used to reinitialize the CTC communications with JES3. 
All jobs that have been transmitted will be processed according to 
their SYSFAIL option. This messaye should ke issued when it is 
desired to reinitialize the miyration aid, normally after a JES3 
system failure that necessitated a JES3 COLDSTART. The ASP operator 
will be prompted to start/restart JESAID. 


The issuance of a RESTART causes an ASPAID cancel transgpission to be 
sent to the JZES3 system. If issued after a JES warmstart or during 
normal operation it may Cause jogs to be run twice on the JES} systen 
(SYSFAIL=RK) andyor cutput data sets for jots to be incomplete cn the 
ASE systen. 


The single exception is if module AIDADAP fails and is quiesced Ly 
ASé FAILSOFT. The issuance of an *RESTART ASPAID under these 
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circumstances will effect the Ceinstatment of module AIDADAP and the 
restoration of the migration aid status, within AS, prior to the 
failure. 


*CANCEL ASEAIL - causes the termination of the ASPAID function. A 
cancel transnissicn is sent to the J=IS3 system to alert JESAID that 
the ASPAIC functions are terminating. Ali joks sent to JES3 are 
processed accordiny to their SYSFAIL option, except that jots having 
the 8 (reschedule Jis) option have their JES Si marked complete and 
are processed according tc the.r JOBFAIL option. 


MESSAGES 


JES3 FROCZSSCR 


ITAT1900 JESAID ACTIVE 


EXPLANATICN: the JESAIL DSP is ready for operator input and is 


proceeding with the processing of paraseters on the "CALL", 
OPERATOR RESPCNSE: None. 


ae ELS er ee 


IAT1901 unit address IS AN INVALIC JESAID PROCESSOR 


222252252255 


be used as a JESAID “CIC" device. 
OPERATOR RESPONSE: Reenter request using valid CIC address. 


IaAT1I9¢2 unit address IS ALREALY /CTIV? 


EXPLANATION: The CTC unit addres:; indicated is currently initialized 
for JESAID communication with the ASP system. JESAID supports a single 
CTC interface to ASP and all subs: quent *START CTC= requests are 
rejected while a given interface s active. 


OQFERATOR RESECNSE: None. 


IAT1903 INVALID OPERATCR REQUEST “text" ...REENTER 


EXPLANATION: A }arameter entered on a *CALL or *START is in error. 
"Text" indicates the keyword associated with the error or the 
non-keyword in ercur. All subsequent parameters specified are ignored. 


OPERATOR RESECNSE: Reenter request via *START or issue *CANCEL to 


terminate. 


ZATI904 "text" TRACE CLISPLAY 


EXPLANATION: An invalid CTC operation has been detected. ‘The "text" 
contains a trace of CTC operations. 
QEERATOR RESPCNSE: Verify that the ASFAID function is active and the 


CTC has been properly initialized in the ASP system. *CANCEL JESAID on 
repeated occurences of this message. 


IAT1905 TERMINATION IN PROGRESS 


Sle ~ ss 
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EXPLANATION: In response to the JES3 operator issuing a *CANCEL or 
*RESTART or a CANCEL transmnission from the ASPAID DSP, all JESAID 
functions are being terminated. 

OPERATOR RESPONSE: If due to an *CANCEL, hy the JES3 operator, no 
operator response is required. If due to an ASP operator *CANCEL or 
*RESTART of the ASPAID DSP, all active functions will be guiesed and 
JESAID will wait for a *START or *CANCEL from the JES3 operator. 

Note: Any attempt to reestablish CTC communication with the ASP systen 
when the ASPAID DSP is not active will cause unpredictable results. 
Therefore, unless ASPAID is active, *START JESAID requests should be 
restricted to writer rerouting options and *RESTABT should not be used. 


IAT1906 JESAID TERMINATED 


EXPLANATION: JESAID has terminated processing due to a JES3 operator 


OPERATOR RESPONSE: None. 


IATI907 READER {ACTIVATED|DEACTIVED} ORIGIN=name 


EXPLANATION: The status of the JESAID reader is as indicated in the 


QEERATOR RESPCNSE: Nene. 


YAT1908 {REALCER|WRITZR} PROCESSING CCMELETE FOR JOB numbersnane 


EXPLANATICN: Reader - The transmission of a job from the ASP system is 
complete and the job has been queued for the JES3 internal reader. 
Writer - All data sets currently queued for the job indicated have been 
transmitted to ASP or requeued for another JES3 output service writer or 
deleted. 


QFERATOR RESPCNSE: None. 


IAT1909 READER IS NOT ACTIVE 


EXPLANATICN: A “RDR=STCE" has been issued and the reader is not 


OPERATOR RESPCNSE: None. 


TAT1910 READER IS ALREADY ACTIVE 


EXPLANATION: A “RER=(START,name)" was issued and the reader is already 


active. 
OFERATOR RESECNS=Z: None. 


ee 


IAT1911 RESTART REJECTED...CTC IS NCT ACTIVE 


EXPLANATICN: *RESTART can only be issued after the CrC has been 
activated via an *START CTC=unit address. *RESTART should only be used 
to reestablish CTC communications with iSP after an ASP system or ASPAID 
restart if JESAID CTC communications ar: not queisced. 

OPERATOR RESPONSE: If communication wi:h the ASP system is desired, 


issue an *START "CTC=unit address" for the JESAID DSP. 


IATI912 WRITER {ACTIVAVEL| DEACTIVATED, iIELDISTCFFED} ALTDEST={ name|NOWE } 


EXPLANATION: ‘The status of the J©SAICL iriter is as indicated in the 


message. NCNE indicates no alternate d2stination. 
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QEERATGR RESPCNSE: None. 


IAT1912 name CANNCT EE USED AS A JZSAID READER DEVICE 

ZSXPLANATION: The device name specified in a RDR=(START,name) operator 
request is offline or not defined as a JZSAID reader device. The JESAIL 
reader device must be defined in the J:S3 ini.i.lization deck as 
"LTYPE=AID" and “DGRCOUF=ASPSYS", 

CEERATOR RESPCNSE: Vary device online to JES; .ct specify valid JESAIZ 
reader device name. 


IBT1914 {REALER|WRITER} WAITING FOR { WORK{CTC} 
EXPLANATION: No joks are currently queued for the indicated processing 
or the CTC is not curently active. 

OFERATOR RESECNSE: If data transazission with the ASP system is desired, 


and the messaje indicates "WAITING FCR CTC", issue *START for CTC=unit 
address; else, no operator action is required. 


IAT1915 WRITER IS NOT ACTIVE 


EXPLANATICN: An operator request to alter the current writer status was 
issued and the JESAID writer was never started. The writer must te 
started before it can be stopped cr held. 

OFERATOR RESPONSE: Issue a *START “WTR=START" JESAID request and then 


alter writer to desired status. 


IATI916 name IS AN INVALID ALTERNATE CESTINATION 
EXPLANATION: The alternate destination specified in a writer start or 
stop request is not a valid "PRT" device. 

OQFERATOR RESPONSE: Reenter request using a valid alternate 


Se Se ee See eS SSeS 


XATI917 WRITER ACTIVE FOR JOB nunker/n- - 


Sea 


EXPLANATION: The writer has found the deta set(s} queued for the job 


indicated and is proceeding to process t)2n. 
OFERATOR RESPCNSE: None. 


TASI918 {OPERATOR|ERRCR} RERCUTE JCB niuwmber/name 


EXPLANATION: ‘The indicated job has been requeued for another output 
service writer 1 deleted based on the optional destination status 
because the write. is "STOPPED", Else. ar «~ or has been detected 
during writer processing for the job indicatei. ALL data sets have been 
requeued for another output service writer or deleted based on the 
optional destinaticn status. 

QPERATOR_ RESPONSE: None. 

Note: Repeated errors may indicate (1) jobs were not submitted via the 
the JESAID reader cr (2) the jobs no lon= ~- ist in the ASP queue or 
(3) the jobs status has been altered by the ASF operator and are no 
lcnger active in the ASPAID SE. 


LALI9I9 CTC CUEISCE CCMPLETE ON UNIT=naze 


ee ee 


EXPLAN’ sli. : CTC communications are terminatea due to an ASPAID cancel 
Or a ¢..53 ¢ erator *CANCEL or *RESTAUT cequesl. 


aia 


f 
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QPERATOR RESPCNSE: None. 


XIAT1920 NO RESPONSE RECEIVED CN UNIT=u1.it address 
EXPLANATION: The CTC aidress specified is not responding to JESAID 
initial CTC transmissioa. 

OPERATOR RESPONSE: Verify that the correct procedure was used to 
initialize ASFAID and J3SAID. *CANCEL JiESAID on repeated occurences of 
this message, reinitialize the CTC communications on the ASP processor 
and recall JESAID. 


ITAT1921 WAITING FCR RELDER/WRITER/CTC ( PTIONS 


EXPLANATICN: No JESAID functions are currently active. 


OFERATOR RESFCNSE: Enter *START JESAID with desired operands or *CANCEL 


TT Te eed 


to terminate JESAID. 


IAT1922 CTC INITIALIZATION COMPLETE ON UNIT=unit address 


EXPLANATION: CTC communications have heen established with the ASF 


systen. 
QEERATOR RESECNSE: None. 


IAT1923 ASPSYS GROUP DEVICE UNAVA‘LABLI 


EXPLANATION: ‘The writer did not £ind ar online device defined as 


"DTYPE=AID" and "DGROUF=ASPSYS", 

QPERAIOR RESPCNSE: Vary a device snline with the appropriate 
Characteristics or if none are defined to JES3 notify ycur Systen 
Programmer. 


TAT1924 EERMANENT I/C ERROR UNIT=unit address 


EXPLANATION: A permanant I/O error has occurred on the CIC device 


indicated. Recovery will be attemcted by restarting the current 
function. If recovery fails, JESA‘D may be quiesed. 
OFERATOR RESFONSE: None. 


IAT1925 JOBS QUEUED FCR READER 


EXPLANATION: Jobs are available in the ASP system for infut to JES3 and 


oe 


no JESAID reader has been started. 
OPERATOR RESEONS3: Start a JESAIL reader if inputting of jobs is 


desired. 


IAT1926 JESAID QUIESCED BY ASFAID CANCEL 


EXPLANATICN: All active JESAID functions have been terminated due to 


OPERATOR RESEONSE: Issue a *CANCEL to terminate or *STARI with desired 


options after ASPAIL is restarted in the ASP system, 


TAT1927 JESAID CUIESCED BY JESAIL FAILURE 


EXPLANATION: A prejraw failure caused all active JESAILD functions to be 


terminated. 
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OLfRhIGH HESPCNSE: Issue *CANCEZL t2 terminate or *STaRI with desired 


Sei arte reew tase sis 


ZTATI3¢9 JOB jok number PURGE WATTias FCR CTe 


te 


XPLANATIGN: The job indicated has completed JES3 processing and the 


job rurjge message is queued waiting for CTC initialization. 
CPERAIOR RESPONSE: Issue an "*s JF:AID,CIC=unit address" if 
Cctmunications with the ASP system is desired. Else, no action is 
required. 

Note: Queued termination messages ire purged if JESAID is canceled 
before the CIC is initialized. 


TATI929 JESAID QUIESCED..INVALID A3iP RESQUEZUE 


EAPLANATION: After a JES3 cold statt, and during CTC initalizaticn, 
job(s) were found in the ASP RG that had previously been transmitted to 
the JES3 system. This indicates an improper Bigration aid 
initialization procedure was used. All JESAID functicns are quiesced 
and @essaje IATi921 is issued. 


OPERATOR RESPONSE: (cef. messaye 1AT1921) 


TATI930 CTC{A{D},unit name RER{A'D},origin name 
WIR{A(D{H(S}, alternate dest 


EXPLANATICN: the current status of the JESAID functions are as 


indicated. 4 - Active, D - Inactive, H - Held, S ~ Stopped 
OPERATOR RESEONSE: None. 


ease Ssenwe ett Ses 


ASP PROCESSCR 


IATI951 ‘text’ invalid 'explanation' [message ignored] 


EXELANATICN: @& tarameter entered cn a CALL or START 1s invalid. 


QEERATOR RESECNS£: ke-enter the correct parameter(s) via START or issue 
CANCEL to terminate ASPAID. If ‘message ignored’ is appended to the 
messaje ali of the input has to ke re-entered, otherwise only the 


Farameter i1 errer has to be re-entered. 


IAT{352 CTC unit-address (xxx) not defined as ASP real main. 


EXPLANATION: The CTC unat-address in the CALL has not been defined as 
an ASF main or, if so defined, has not been defined as a REAL main on a 
MAINPROC initializ::ion card. 

ORERATOR RESPONSE: Check the CTC address entered. If incorrect 
re-enter the Correct unit-address cn a *S ASPAID conmand. If correct 
contact the system programmer. 

PROGRAMNER RESPONSE: Select other CTC address for migration tool or 


restart ASP with MAINEROC for real nrocessor jesired. 


TATI952 ASP MAIN (xxx) online 


EXPLANATION: The main selected as a Bigruts,s tool is online to ASP as 
a real main. 
OPERATOR RESPONSE: Vary the MAIN o‘fline to 4SP and notify ASPAID via 


the START cz: wand. 
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IAT1954 {JOBS{IJP{ACDS} active on ASF MAIN selected for migration. 


EXPLANATICN: Jobs are active on the sain selected, or IJP or ACDS is 
active for the main selected. 

OPERATOR RESPONSE: Cancel the jobs or functions active on the main, or 
allow them to complete and notify ASPAID via the START command when the 


main is quiesced. 


IAT1955 ASPAID initialized - job selection for asigration started 


EXPLANATION: ASPAIC has been initiali::ed and jobs that seet smigration 
criteria are being selected and gueued for migration. 
OPERATOR RESECNSE: When the JES system is active - issue a START ASPAID 


Sele Se ee 


to begin job migration. 


IAT1956 ASP-JES3 migration active 


Job migation has been started to the JES3 systea. 
RATOR RESPONSE: None. 


IAT1957 ASPAID ACTIVE. Job scheduling for migraticn started. 


EXPLANATION: In response to an operator *START Command the ASEPAID CTC 
Communications task has been started and JSS has teen frosted to start 


the scheduling of jobs queued for wigration. 
OPERATOR RESPONSE: None. 


eee 


ITAT1958 ASPAID TERMINATION IS IN PROGRESS 


EXPLANATION: In response to the ASP operator issuing a *CANCEL ASPAID 
command, all ASPAID functions are keing terminated. All aigrated jobs 
will be processed according to their SYSFAIL option. 


OPERATOR RESPONSE: None. 


eS ee ee 


JATI959 ASPAIL TERMINATED 


EXPLANATION: ASPAID has terminated prcecessing due to an ASP operator 


QEERATOR RESFCNSE: None. 


IaT1960 ASPAID RESTART PROCESSIN; COMILETZ - START/RESTART JESAID ON 
JES. SYSTEM 


EXPLANATION: In response to the iSP oj,erator issuing a *RESTART ASPAID 


Command, ASPAIL has processed all joks active on the JES systen 
according te their SYSFAIL option and tas re-initialized AIDADAP. 
AIDADAP is waiting for an initial transmission from JzSAIL. 

QOFERATOR RESPCNSE: Notify the JE.» operator to START/RESTART JESAID to 


re-establish communications. 


TAT1961 JESAIL terminated by JES operator. 


EAPLANATION: JESAIC has ke-:n canceled by the JES operator. 


SYSTEM ACTION: ASEAILC will wait ‘or *CANCZL or *RESTART from ASP 
Operator. 
CEERATOR RESECNSE: Enter *CANCEI ASFA CT if the migration function is to 


be terminated. Enter *RESTART AS2AILD £ JES is to be CCLUSTARTED. If 
JESAILD is restarted no operator ection is necessary. 
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IAT1962 Jok asp-job-number {ACTIVE|CCMPLETE} on JES3 as jes-jot-number 


EXPLANATION: ACTIVE- The transmission of the job to tne JES3 system is 
complete. COMPLETE - The jcb has completed JzZS3 processing and all data 
transmission for the job is complete. 


OFERATOR RESECNSE: Ncne. 


IAT1963 ASPAID {CLASS|CRIGI4} table 
{eupty({ job-class1,2...n{crijini,2...n}} 


EXPLANATION: The CLASS or ORIGIN migration selection criteria consisted 
of the class(es) or oriyin(s) specified. 
OFERATOR RESECNSE: None. 


IAT1964 AIDALDAP FAILED - restart ASFAID to refresh or cancel ASPAID 


EXPLANATION: AIDADAP, the ASFAID CTC IyC handler has failed. 


QFERATOR RESECNSE: Enter *RESTART ASFAID to refresh AIDALDAP and restart 


Migration processing, or enter *CANCEL ASFPAID to terminate migration 
processing. 


IAT1965 Messaje received from JES for JES job jes-jor-number invalid. 


EXPLANATICN: A job started or completed message was received for a job 
unknown to ASP from JES. This may occur as a result of a non-ASP 
submitted JES job specifyinj ORG=ASPSYS or an improper sequence of 
*RESTART ASPAID/JESA”D compands. 


CPERATOR RESPONSE: one. 


IAT1966 INVALIL OFERATOR REQUEST 
EXPLANATION: An operator message was directed to the J#=S3 processor and 
is rejected. 

OPERATOR RESECNSE: None. 


IAT1967 RESQUEUE INVALID..ASPAID RESTART PROCEEDING 


EXPLANATION: After a JES3 cold start, transmitted jobs were found in 
the ASP RQ and ASPAID restart processing is being performed. 

OPERATOR RESPONSE: None. 

Note: ASFAID must be restarted or canceled whenever JES3 is cold 
started if jobs }revicusly transmitted to JzS3 had not completed JES3 


processing. 


IaT1968 ASPAID messaye accepted 


EXPLANATION: he last command entered has been processed by ASPAID. 
This message will only be issued when the operator command did not cause 
ahy other message to ke issued. 


QPERATOR RESPCNSE: None. 


ZAT1969 JES3 SYSMSG { START{ END} 


EXPLANATION: This message delimits tie JES3 portion of the S¥SMSG file 


printed by ASP to better define “hat >utput generated by ASP and JES3. 
OPERAIOR RESPONSE: None. 


eS S52 ee 
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IAT199 "“ctc trace" 


EXPLANATION: AIDALTAP trace. "ctc trace" contains a trace of CTC 
operations. 
QEERATOR RESEONSE: Nene. 


SS See 5 See See eee 


VAR9Q migration-system-name MIGRATICN TOOL. CANNOT BE VARIED ONLINE ON 
SUFFORT ; 


EXPLANATION: The main specified on the vary command is active as a 
migration aid and cannot be varied online as an ASP main. 
OPERATOR RESPONSE: Ne response is necessary if the migration tool is to 


remain active. If the main is to be tsed as an ASP main, then enter 
*CANCEL ASPAID and after ASPAID has terminated vary the main online. 


IS¥92 JOB jokt-name CANNOT BE SENT TO JES. ‘text' 


e The job is a non-standard job and there is insufficient room to add a 
SE for JES in either the JCT or JD.B. 


e The job's /y*MAIN card migration request cannot be honored since the 
migration aid has not been called. ; 
SYSTEM ACTICN: The job is placed in « perator hold. 


=e eS SS eee 


OEZRATOR RESPCNSE: Release the job fcr ASF execution, cancel the job or 
notify the programmer to determine action to be taken. 

PROGRAMMER RESEONSE: Notify operator to release the job for scheduling 
on the ASP system or to cancel the jok and resubmit the job when the 
migration tcol is activated. The job cannot be held for migration since 


the migration selection is only made curing input service. 


ISV93 JOB SELECTED FCR MIGRATICN TO .ES3 


EXPLANTION: The job has been selected for migration to JES3 based on 
job class, jok origin, or the JESCET ;arameter on the //*MAIN card. 
SYSTEM ACTION: The job will be scheduled to ke sent tc the JES3 

system. After executing on the JES3 system, of if the miyjration aid is 
canceled, further scheduling on the ASF system will be dependent on the 
system default or programmer options : pecified. 

This will be the last messaye in S¥SM:G if the migration aid is canceled 
prior to the job teing actually sent -o the JES3 system and the jcb is 


canceled with output. 


JSS09 JOB jok-name CANNOT BE SENT TO JES. ASPAID CANCELED. JCB HELD. 


EXPLANATION: The specified jor that had been selected for JES 
processing cannot ke scheduled for JES since the ASPAID function has 
been canceled. 

SYSTEM ACTICN: The job has its JES Si marked complete ana is placed in 
operator hold. 

OPERATOR RESPCNSE: Release the jok fcr ASP execution, cancel the job or 


PROGRAMMER RESFONSE: Notify operator to release the job for scheduling 
en the ASP system or to cencel the jo! and resubmit the job when the 
Bigration tcol is activat¢d. he job cannot te held for migration since 


the migration selection i: only made «uring input service. 
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The following are proy,ramming notes and restrictions for the J=ES3 (VSZ 
Release 3) user. 


PROGRAMMING NOTES 


ACTIVATING JES3 STANDALONE DUMPS 


Standalone Dump Formatting 


SS Se SS 


Module IATABPR executes aS a user exit routine to the OS/VS2 service aid 
program AMPPRDMP. It serves as an anterface between AMDPRDMP and the 
JZS3 dump formatting routines to ,roduce printed control blocks from a 
Yaw core image dump. : 


Module IATABPR is reenterable. To improve performance when printing 
core image dumps with AMDPRDMP, it is recommended that IATABPR reside in 
the pageable link fack area. 


Control Statements 


Module IATABPR processes two additional control statements as input to 
AMNDPRDMP: JES3 OFF and JES3 D&BUG. 


J2S3 OFF -~- This control statement causes module IATABPR to bypass 
processing of any JES3 control blocks for the duration of the job step 
initiatinj AMDPRDAP. Tnis aid is intended to ennance the performance of 
AMDPRDMP when either the core imaye dusgp does not contaan a JES3 
subsystea to be formatted or when JES3 control block formatting is not 
desired in the printed output. 


Se ee 


in problem solving in the event of a program check during format 
processinj of JES3 control blocks. The JES3 DEBUG statement allows a 
snapshot dump (ID=77) to be written to the JESISNAP data set. The 
Shapshot contains registers at the tise of the snap and the storaye 
occupied by the failiny wodule followed by the storaje occupied by the 
ABNCSZCT work area. Iaeportant rejisters convey: 


e R11 Address of IATABPR work area (DSECT ABNXTN mapped by IATYXTN) 


e 813 Address of formatting work area (DSESCT ABNCSECT mapped by 
TATYABN) 
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Hessages 


Seven nessayes are possible durin, ZTATABPR processing. They are written 
directly to the AMDPRIMP PRINTER data set at the time the conditions 
that ,;rovok2 the messaye is encountered. 


{EXCZSSIVI OUTEUT DCURGNG JE53 FORMATTING IN module-naae} PROGRAM CHECK 
DURING JES3 FOFHATITING IN todule-naaej] POSSIPLs LOOP OF J3S3 FORMATTING 
IN nodule-name } 


Explanation: iacessive output (more than 3K) lines, a frojraa check, or 
excessive time (more than 3 minutes) was detected while acdule-name was 
in controi. the PSW and registers at the time of failure ale also 
printed, followed by the moaule ID referenced by base rejister 10 at the 
tame of failure. 

System Action: Continued processing is attempted with the next 
formatting module. 

Programmer Response: If the messaye 15 accompanied by unsatisfactory 
dump output, rerun the job with a J5S3 OFF control statement to bypass 
JZS3 formatting. 

Problem Determination: Rerun the job with a JES53 DEBUG statement. 

Table I, items 1, 5, 13, Z2 

Module: IATABrR 


—Se SSS 


SNAPSHOT FAILED DURING JES3 DORUS Nove 


Explanation: The OS/¥S2 macro SNAP failed to produce outgut Guriny a 
J=S3 DEBUG interval when an unexpected return code was encountered. 
System Action: Continued processing is attempted with the next 
formatting module. 

Programmer_Response: Make sure the job step includes a JES3SNAP DD 


statement. It may be necessary to increase the REGION size for 
execution of AMDPRDMP. 


JiS3 PERFORMANCE-AID CDE ARZA ZRROR-FORMATTING MAY EBS SLOWED 


Explanation: An invalid address was encountered while obtaining CDE/XTNT 
list data from VS control blocks (that is, module names and their extent 
addresses). Tke table is marked incomplete and way o© may not impact 
the speed of JES3 dump formatting. A longer lookup method is used when 
a name or address does not exist in the CDS table during JES3 McMORY 
USAGe formatting, FCT formatting, or trace table formatting. 

System Actaon: None. JES3 dump formatting continues. 


or the area was ;reviously destroyed before the dump). If this 
condition is persistent on several different dumps, the problem is 
likely to be an internal error in formatting module IATABN7. 

Problem Determination; Table I, items 4, 7, 16; Table III, item 7. See 
OS/¥S Message Library: JES3 Messages, 6C38-1012. 


Module: IATABN? 


JES3 PERFORMANCE-AID DSP AREA OVERFLOW-FORMATTING MAY BE SLOWED 


names). The table is marked incomplete and may or may not impact the 
speed of JES3 dump formatting. The DSF table is used to obtain DSP/EPC 
names during formatting of FCIs and trace table entries. Names are 
obtained by a longer lookup method when they do not exist in the DSP 
table. 
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stem Action « JE53 dump formatting continues. 
ErOgrammer response: None. The internal table capacity of 140 entries 
has been exceeded. Performance may trot be appreciably affected in nost 


Problew Determination I, items 4, 7, 16; Table III, itea 7. See 
QOs/VS Nesyages Library: JES: Messages, GC38-1012. 
module: IATABNS : 


=== 


Explanation: ico many CivZ naaes exist on the JOB PACK QUEUE to fit in 
tna JiS3 dung formattin, performance-aid CLE table (capacity is £30 
hamas). Ihe tabdie is marked incomplete and may or tay not impact the 
speed of JES3 dummy rormattiny. Tie CLE table is used to obtain module 
hames/entry points during formatting of JiS3 MPMORY USAGE, FCTs, and 
trace table eatries. wsames will be obtained by a lonjer lookup metnod 
if they do not exist in the CDS table. 

Systen Acticn: None. JES3 dump formatting continues, 

Programmer Response: none. The internal table capacity of 250 entries 
has been exceeded... Only reduciny the nuaber of names on the job pack 
queue will circumvent this condition. terformance may not be 
appreciably affected 1n most cases. 

Problem Determination: Table I, items 4, 7, 16; Table III, item 7. Sse 
O3/VS dessyes Library: JiS3 Messages, GC38-1012. 


==sa5 =S5= S| SSeS 


J253 PERFORMANCS-alIl NOT AVAILABLO-FGRMATTING MAY BE SLOWcD 


EXplanation: The GETMaIN for a performance table of 3086 bytes railed 
during JES3 formattin,. Formatting continues, but reverts to "normal" 
mode which may have an impact of noticeably slower duap formatting of 
J=S3 control blocks. 

System Action: None. JES3 dump formatting continues. 

do2s not usur; all of vartual storage for use as buffers. This 
ligitatioa can Le imposed by using the REGION keyword on the JCByYELEC 
Statement. ror -xampie, //DUMP JOB REGION=256K will limit the Luffer 
area to 236K, and leave a sizeable residue for mnodul2 loading and fixed 
Length SirMaINs. 

Probl2a Deterninatzron: Table I, items 4, 7, 160; Table YII, item 7. See 


Qi/VS Messajes Library: JES3 Nessages, Ge3d-1012. 


thodule: LATaBu7 


aXpaanation: The inte.nal Luffer aanajement could not be uctivated. The 


ctuffering functacna reverts to “"noimal" mode to continue formatting. 
T@pact is a hijher deyree of CrU overhead. 
System Action: Yone. JzeS3 dump Formatting continues. 


PLOQjcammer Response: The TATABrR tormatting module draver for Ji53 could 
net locate a key Comparand in EROMP module routine AMDPRRLC, or the Key 
buffer map entry did not contain a JES3 aAZID. The ost Likely cause of 
the problem is that JiS3j3 noduie ITATABP® 1S Operating aS an exit routine 
to an incompatible version of AMDeQDME. iake sure tie Versions are ut 
conpatibl> program levels. Only the CPU speed of formattiny 1s affected 
Dy this condation. 
Eroblen veterminaticna: 


See 


I, atemws 4, 7, 16; Table [IL, item 7. 
Messa,es, GC36-1912, 
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-ABZND USER=77 


Explanation: A program exception occurred during J2S3 formatting that 
could not be processea aS expected. Addressing to essential work areas 
was lost. 

System Action: The AMDPRDM? job step is abnormally terminated, with a 
dump written to tue SYSUDUMP/SYSABEND data set. 

Programmer Response: To optain a complete dump from AMDPRDMP, it will 
be hecegsaLy to rerun the job wits. a JES3 OFF control statement. 
Problem Determination: Table I, items 1, 5, 13, 22 


Module IATABPR executes as a user exit to AMDPRDMP, The service aid 
projram becomes aware of user exits by entries in a aodule named 
AMDPRECT, which resides in SY¥S1.LiNKLIB. The method for activating a 
user exit is explained in Setting Up the CCT in the section for the 
PRDMP User Exit Facility (see Appendix C in OS/VS2 Service Aids, 
3C28-0674). The appropriate AMASPZAP input is: 


REP offset C9C12£3C1C207D940, 80000000 
REP offset+0C DICSE2FI40404040 


which translates to: exit to module IATABPR on any TCE being formatted 
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or on any JES3 control statement verk. 


ASP3.1 TG JES3 CCNIRCL CARD CCNSICERATICNS 


Re 


* 


strictions/Incompatabilities (ASE3.1 to JES3) 


Although the ACMAIN and ACHOLD paraseters on the //*MAIN card are 
still allowed, an additional, more flexible function has been 
provided on the //*FORMAT card, namely the MAIN and HOLD parameters. 
The following FORMAT card would perform the identical function that 
is available via the MAIN card: 


//*FORMAT AC,DDNAME=, MAIN=ain~-nanme, HOLD=YES 


By moving these parameters to the FORMAT card, the TSO user can 
select by data set which on2s he wishes to see at this terminal. 


The creation of Format Parameter Buffers (FRP) and the method with 
which the data is added to them has changed from ASP3.1. In ASP the 
use of the //*FCRMAT card caused all fields in the FRP to be filled. 
If a parameter was not specified the default standard was used. No 
consideration as to whether the non-specified parameter had keen 
defined on a default FCRMAT card (where DDNAME=, was specified) or on 
the SYSOUT initialization card for the SYSOUT Class Table. The FRP's 
in JES3 are filled in the following sequence: 


1. //*FORBAT card for this data set 

2. JCL parameters on the JCL statement for this data set. 

3. SY¥SCUT Class Takle entry for the SYSOUT class of this data set 
4. Default FRP resulting from a //*FORMAT CONAMS=, card 

5. JES3 defined standard. 


Only if a parameter is not specified in the first four sources is the 
JES3 standard used. 


Any job that uses UNIT=(CTC,,TiFER) to reference a data set created 
via the ss*DATASET card must be run on an ASP (MVT or VS2/1) Main 
Precessor. The UNIT=(CTC,,DEFER) will not be supported ty the 
Converter/sInterpreter and GlobalysLocal (MVS) Processor. 


A job may ke run on any processor and access a card image (column 
binary) data set by using the JES3 supported MCDF=C DCE parameter on 
the [Bf card. If MCDE=C is used cn the DD * statement, it must be the 
only parameter following the * or DATA. The data set gust Fe 
terminated by a /* when the MOLE=C parameter is used, Therefore, the 
card must be: 


//adname CLO *, LPCB=MCDE=C 

Input Service adds to eack [D * or CDP DATA card ‘DCB=BLKSIZE=80'. If 
MNCLE=C was specified, BLKSIZE will ke set tc 160. Also, for a job 
containing card image data, the reader (CR} must be called with the C 
parameter (that is, *X CR,=). 


Any DSP specified on a //*PROCESS card must be defined in the JES3 
DSP Dictionary as processable. Any job specifying a DSP that is 
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defined as not processable will be flushed. 


@ <JESHSG, JESJCL, JOURNAL, JCELOCK, JFSInnnn are new ddnases used by 
JES3 and are added to the list of other reserved ddnases used by ASP; 
S¥SNSG, JCBIN, JCBIAB, and JCLIN. 


e If SEQCHK=YES was specified on the STANDARDS initialization card 
under ASP, Input Service would sequence check input object decks. 
Since the CS Linkaye Editor perforas its own type of validation, this 
functicn was removed from the JES3 Input Service. 


* Due to the new method of reading data by the readers (CR, IR, and 
DR), the maximum blocking factor for input to TR and DR is now 40. 
The maxinus for CR remains five. 


e HOTJOB=YES specified on the /y/*HAIN card of jobs scheduled to run on 
a Global or Local (MVS) Processor w.1l be ignored. This parameter 
will be hcenored if the job is schediled and run on a ASP main 
processor. 


Restrictions Repoved {aSP3.1_to_JES3) 


e The continuation punch in colurme 72 is no longer required to continue 
a JES3 control card. 


e The limit cn the number of //*FCRMAT cards per //*FROCESS card to the 
size of a JEFS3 tuffer has been ceaoved. 


ese SSS he eee Sse See Se ee ee 


e Use of the //*PROCSSS RICONIL is still permitted and will he 
converted to RI internally. 


© //*PROCESS FRINT, EUNCH, or ACLS will still be allowed. The first 
one found will ke converted to //*EFROCESS CUTSERV. Any others of 
these three immediately following the first will be ignored and will 
be flagged as such. An intervening //*FROCESS card of another DSP 
followed by one of these three will cause a new //*PROCESS CUTSERYV to 
be created. These three DSE's are grouped in this manner since all 
will be processed by Output Service under JES3. 


e The /* prefix used in ASP Versicn 2 will still be supported for those 
ASE control cards orginally supported under that syste. 


e The //*ZNDPROCESS card is ne longer supported. It will ke treated as 
an OS comments card. 


DEFAULT UNIT FARAMETER 


If a dynamic allocation is made on tehalf of a time-sharing user without 
specifyiny a unit parameter, the unit parameter is obtained from the 
time-sharing user attribute data set (UAD). If the user is not a 
time-sharing user or if the UAD's entry does not contain a unit 
parameter, a KVS default of 'SYSALLIA', that is, all direct access 
devices, is used. 


It is recommended that a default unit parameter value be defined in the 
UAD and that all dynamic allocations specify a unit parameter. 
Ctherwise, the MVS default unit value of "SYSALLDA't must be included in 
SETNAMZS for all DA device tyzjes if JES3 is to manage the dynamic 
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allecations tnat de nct have a unit palameter,. 


ole RCUTINES IN FLEA 


It is recommended that the disabled interrupt exit (DIE) routines, 
IATDMES and IATSSDI, be located ain the fixed link pack area (FLPA) 
rather than in the ELEA, These two reutines will normally ce 
raje-fixed, which will result in over-utilization of real storage in 
PLPA. 


DYNALLOC CARD 


JCL CL statements are no longer valid for describing the various 
procedure likraries under JES3. instead, the CYNALLCC card in the JES3 
initialization deck must te used. This is necessary in order to allow 
the dynamic unallocaticnyreallocation of procedure libraries during 
procedure library update jobs. The format of the DYNALLOC card may be 
found in the Initializaticn and Tuning Guide manual. 


INTERE PARAMETZIR ON STANDARDS CARI 


The fcllewing describes the optional INTERE parameter on the STANDARDS 
initialization card: 


Whenever SYSTEM=ANY has been s ecified for a given job, whether on 
the //*MAIN card or by default to the system indicated on the 
STANDARDS card during initaalization, a decision must te made as to 
whether the CS ReaderyInterpreter or the VS ConverterysInterpreter is 
to process the JCL for that jot. A user exit capability in Ingut 
Service? wisi be provided to al'cw the user to determine under which 
system the jeb is tc run. However a default must be provided if that 
exit routine has not been provided by the user. The INTERP keyword 
provides such a defarlt. 


Ti INTERP=ANYJES (the default), the job will be precessed for a YS2 
enviionment, ANYASE will cause the job to be processed for an MYT or 
V52 release 1 (ASP MAIN) environgwent. INTERP=BOTH indicates that the 
jet sheculd be processed in such a wanner that will allow it to be 
executed in any ¢nviroament, the final decision being left to Main 
Service. Hewever, since a sigrificant amount of overhead is 
associated with the latter case, due to the necessity to process the 
ject through both the VS Converter and the CS Reader, its use is 
strongly discouraged. Resolut on of SYSTEM=ANY by the user, via the 
user exit, is to be preferred. 


Note: There is no s/*MAIN ove: ride for the INTERP value set at 


initialization since it is only used when a SYSTEM=ANY situaticn 
cannot be resolved. 
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JES3 MODULES LINK-ELIT ATTRIBUTES 


All JES3 modules are link-edited with the following attrikutes: 


In 


LET 
NCAL LIST 
XREF 


addition, the followany modules have the 'RENT' attribute. 


IATDMDK IATOSDI IATSIST IATGSCI IATIIRC 
IATDMESB IATSIBS IATSIVL TATIIAM IATIIRM 
IATDMFR IATSICA IATSIWO TATLICA TATUXO4 
IATIIFD TATSICF TATS134 IATIICC LATUX05 
ITATIICX ITATSICN IATSSCM TATIICM TATUX06 
ITATDMDM IATSIDM IATSSDI ITATIIDR LATUKO7 
IATDMDS LATSIDO IATUXOL TATIIPR TATUKOS8 
IATIIIL IATSIDR LATUXO2 IATIIPO TATUXO9 
IATIMDL TATSIJS TATUXO3 IATIIPL ITATUXLO 
LTATIIRX IATSIOP IATUX26 IATIIP2 TATUX11 

ITATIIP3 TATUX30 


PAGES FARAMETER CN THE BUFFER INITIZLIZATION STATEMENT 


In selecting the size of the buffer fool using the FAGES parameter, 
consideration should be given tc the fact that all functions might be 
active at the same time. The buffer pool should therefore Le 
allocated to cover the worst case, since the buffer fool is not 
expandable after initialization. In addition, since JSAH Laje 
releases 4K blocks when they are no longer in use, it 1s advantageous 
to make the buffer fool as larje as possible since very little 
penalty is incurred to make the pool large and the system is better 
able to accomodate Lursts of activity. 


PERMANENTLY RESICENT MODULES 


For modules not already permanently resident, JES3 uses a counter to 
determine the number of times a module has teen loaded and deleted. 
Once a medule has been loaded 5 times it is marked as resident and 
subsequent deletes are ignored. A module's resident threshcld count 
can be dynamically altered using a JES3 *Modify command. 


CATALOG REFERENCES 


Utilities which establish entries in a cataloy can not be executed as 
a step of a job which contains JCL ceferences to those entries. 
Dependent Jok Control (DJC) can be ised to execute the utility as a 
separate jok. 


A catalog entry made as a result of the DFISF=CATLG parameter on a CD 
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statement can Le referenced in a subsequent step of the same jcb. 


COMPLETICN CODE ENDING IN ‘22° 


Although abnormal termination occurs, a Corresponding dump is not 
provided by the operating systema if the completion code specified 
ends in a '22'. (For example, $122, $322, S722, etc.) 


INITIALIZING JES3 FRCH A CARD READER 


When initialization is performed by reading statements in from a card 
reader, initialization statements that precede the JES3 I/C 
statements are not available for printing when the JES30UT data set 
is opened. 


JES3 MODULE NAMING CONVENTION 


JES3 modules created by the JES3 user (user-written DSPs): must 
conform to the standard naming convention established for JES3. That 
is, the first three characters of all JES3 nodule names must Le IAT. 


JCECAT ANDL STEPCAT VATA SETS 


In order for JES3 te perform pre-execution setup for JOBCAT and 
STEPCAT data sets, units on whicl these data sets are to reside must 
be JES3 managed devices (that is, the unit must ke defined on a 
SETNAMES initialization statement). 


JOB NUMBERING AFTER A RESTART 


After a restart, the internal nu1bering of jobs resumes with the next 
available number not assigned to an active job or job in the queue. 
This means that it is possible t: restart with a job number assigned 
prior to the restart if that jok had been purged after the last 
checkpoint taken prior to the restart. 


PROCEDURE LIERARY UEFLATE FACILITY 


Procedure likrary data sets (desijnated by IATFLExx ED cards) can not 
be concatenated data sets. Each procedure libary data set must be 
specified in the initialization deck by a DYNALLOC card, and must be 
cataloged in the sytem catalog. Prior to update of the standard 
procedure library (IATPLBST), an initiator must already be active on 
the global machine. 


All procedure library update jobs must run on the main processor 
designated as JGLCBAL. 
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SPECIFYING THE UNIT PARAMETER WITH C) TALOGED DATA SETS 


At the time JES3 resolves catalog re: erences, there is no way to 
determine whether the UNIT specified is a subset of the unit type 
referenced. If the user specifies a unit that is incompatible with 
the cataloged data set (such as a data set on a 2314 device with a 
UNIT=3330 specified), then JES3 will flush the job. 


SYSOUT BLOCKING 


SYSOUT block size limit is 32767 and is independent of JES3 buffer 
size. Actual blocking of data is transparent to the user. 
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To order J2S3 as an independent component of OS/¥S2 Release 3, Contact 
your IBM representative or the IBN Brancn Office serving your locality. 
It is no lonjer necessary to fill out a Program Order Form; your IBM 
representative places the order for you. 


An OS/VS2 Release 3 Starter System is required for initial systen 
generation. 


J=ES3 as distributed on magnetic tare only. The number of user tape 
voluaes required is specified in the basic and optional material lists 
which follow. 


JES3 basic machine-readable object code is distributed in SuP forgat. 
J2S3 optional material is distributed as a SYSIN data stream compatible 
with the IEBUPDTS utility prograa. 


You yet one copy of machine readable material consisting of the JES3 
Distribution Library. Order the basic ,rogram aaterial by selecting one 
of the following feature numbers. 


Feature Number Track/Density Number of Tape Yoluses 
5039 9 track/1600 BPI tape None (DTR) 
5040 9 track/6250 BPI tape None (CTR) 


You can optionally order one copy of JES3 source code and JES3 macros. 
Order the optional program material by selectiny one of the following 
feature numbers. , 


Feature Number Track/Density Number of Tape Voluases 
5428 9 track/1600 BPI tape 1 
5429 9 track/6250 BPI tape 1 
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RUBLICATIONS SUPPORT OF JES3 © 


The following publications contain specific information about JES3 and 
are used in conjunction with other publications that support 0S/VS2. 


Rlapning and Isplesenting a JES3 3yster 


Title 


Introduction tec JzS3 


OS/VS2 Systes Programming Library: 
Initialization and Tuning Guide 
OS/VS2 System Programming Library: 


Job Manayement 


Operator's Library: | 
OS/V¥S2 Reference (J55S3) 
Operator's Library: 
OS/VS2 Remote Terminals 


JES3 Job apglications 
Title 

OS/¥S2 JCL 

Problea beterajnation 
Title | 


OS/VS2 Message Library: 
JES3 Messages 


OS/VS2 S;stem Projrasming Library: 


JES3 Debugging Suide 


Tatle 


OS/VS2 Systea Programming Library: 


JES3 Macro Instructions 
OS/V¥S2 JES3 Logic 


(35 3) 


Base Order Number 
GC28-0607-0 


GC28-0681-1 
GC28-0627-0 


Base Order Nusber 


6C38-0226-0 
GC 38-02238-0 


Base Order Nusber 
$C 28-0692-1 


Base Order Number 


GC38B- 1012-0 
GC28-0703-0 


written DSps 


Base Order Nysber 


GC28-0608-0 
SY¥28-0612-0 
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Applicable TNLs 
None 
GH28-2603 


GN28-2601 


APELicable TWLs 
GN28-2600 


Applicable TuLs 


Yone 


Yone 


Applicable TELs 


None 
None 


